Add byte-order group modifiers to (un)pack templates.

Follow-up on: #22734, #22745, #22753, #22754.

Subject: Group modifiers in (un)pack templates
Message-Id: <20040503201441.1b058e0d@r2d2>

p4raw-id: //depot/perl@22780

1 files changed, 2 insertions, 1 deletions

diff --git a/perl.h b/perl.h
index 1ee475664f..ba7e3dc8ba 100644
--- a/perl.h
+++ b/perl.h
@@ -3719,11 +3719,12 @@ typedef struct {
   char*    patend;   /* one after last char   */
   char*    grpbeg;   /* 1st char of ()-group  */
   char*    grpend;   /* end of ()-group       */
-  I32      code;     /* template code (!)     */
+  I32      code;     /* template code (!<>)   */
   I32      length;   /* length/repeat count   */
   howlen_t howlen;   /* how length is given   */ 
   int      level;    /* () nesting level      */
   U32      flags;    /* /=4, comma=2, pack=1  */
+                     /*   and group modifiers */
 } tempsym_t;
 
 #include "thread.h"