diff options
| author | Abigail <abigail@abigail.be> | 2007-06-30 01:38:07 +0200 |
|---|---|---|
| committer | Yves Orton <demerphq@gmail.com> | 2007-06-30 15:37:41 +0000 |
| commit | f7819f85d6af0dcf9114284a4fe5ef21855e4e5a (patch) | |
| tree | 0f20f81b6e703acd015e53b4400a73956f2cf7a4 /regnodes.h | |
| parent | c4a7531db1b7667c9d43fd3494f5bbf4901ff149 (diff) | |
| download | perl-f7819f85d6af0dcf9114284a4fe5ef21855e4e5a.tar.gz | |
/p vs (?p)
Date: Fri, 29 Jun 2007 23:38:07 +0200
Message-ID: <20070629213807.GA14454@abigail.nl>
Subject: [PATCH pod/perlre.pod] Keeping up with the changes.
From: Abigail <abigail@abigail.be>
Date: Sat, 30 Jun 2007 01:24:36 +0200
Message-ID: <20070629232436.GA15326@abigail.nl>
Plus tweaks, and debug enahancements.
p4raw-id: //depot/perl@31506
Diffstat (limited to 'regnodes.h')
| -rw-r--r-- | regnodes.h | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/regnodes.h b/regnodes.h index 4e0f44d5ca..0a19006d55 100644 --- a/regnodes.h +++ b/regnodes.h @@ -619,4 +619,46 @@ EXTCONST char * const PL_reg_name[] = { }; #endif /* DOINIT */ +/* PL_reg_extflags_name[] - Opcode/state names in string form, for debugging */ + +#ifndef DOINIT +EXTCONST char * PL_reg_extflags_name[]; +#else +EXTCONST char * const PL_reg_extflags_name[] = { + /* Bits in extflags defined: 10111111111111111111111100111111 */ + "ANCH_BOL", /* 0x00000001 */ + "ANCH_MBOL", /* 0x00000002 */ + "ANCH_SBOL", /* 0x00000004 */ + "ANCH_GPOS", /* 0x00000008 */ + "GPOS_SEEN", /* 0x00000010 */ + "GPOS_FLOAT", /* 0x00000020 */ + "UNUSED_BIT_6", /* 0x00000040 */ + "UNUSED_BIT_7", /* 0x00000080 */ + "SKIPWHITE", /* 0x00000100 */ + "START_ONLY", /* 0x00000200 */ + "WHITE", /* 0x00000400 */ + "LOCALE", /* 0x00000800 */ + "MULTILINE", /* 0x00001000 */ + "SINGLELINE", /* 0x00002000 */ + "FOLD", /* 0x00004000 */ + "EXTENDED", /* 0x00008000 */ + "KEEPCOPY", /* 0x00010000 */ + "LOOKBEHIND_SEEN", /* 0x00020000 */ + "EVAL_SEEN", /* 0x00040000 */ + "CANY_SEEN", /* 0x00080000 */ + "NOSCAN", /* 0x00100000 */ + "CHECK_ALL", /* 0x00200000 */ + "UTF8", /* 0x00400000 */ + "MATCH_UTF8", /* 0x00800000 */ + "USE_INTUIT_NOML", /* 0x01000000 */ + "USE_INTUIT_ML", /* 0x02000000 */ + "INTUIT_TAIL", /* 0x04000000 */ + "SPLIT", /* 0x08000000 */ + "COPY_DONE", /* 0x10000000 */ + "TAINTED_SEEN", /* 0x20000000 */ + "UNUSED_BIT_30", /* 0x40000000 */ + "TAINTED", /* 0x80000000 */ +}; +#endif /* DOINIT */ + /* ex: set ro: */ |