diff options
| author | Charles Bailey <bailey@newman.upenn.edu> | 1998-03-12 11:02:29 -0500 |
|---|---|---|
| committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-03-16 15:55:28 +0000 |
| commit | 09b7f37c58c6da6f4965b846b64eab7d9a205663 (patch) | |
| tree | 0175e00c54b302fe0ffcfa25f9c82103d3196460 /regcomp.c | |
| parent | a887ff1142f02c0c19143d1511194864ae5eafab (diff) | |
| download | perl-09b7f37c58c6da6f4965b846b64eab7d9a205663.tar.gz | |
VMS updates (direct)
[Needed manual tweaks on vms/config.vms since it clashed with other
patches. I may have got it wrong.]
p4raw-id: //depot/perl@817
Diffstat (limited to 'regcomp.c')
| -rw-r--r-- | regcomp.c | 10 |
1 files changed, 7 insertions, 3 deletions
@@ -140,7 +140,6 @@ static I32 extralen; #ifdef DEBUGGING static int colorset; -char *colors[4]; #endif /* Length of a variant. */ @@ -171,8 +170,13 @@ static scan_data_t zero_scan_data = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }; #define SF_FIX_BEFORE_EOL (SF_FIX_BEFORE_SEOL|SF_FIX_BEFORE_MEOL) #define SF_FL_BEFORE_EOL (SF_FL_BEFORE_SEOL|SF_FL_BEFORE_MEOL) -#define SF_FIX_SHIFT_EOL (+2) -#define SF_FL_SHIFT_EOL (+4) +#ifdef NO_UNARY_PLUS +# define SF_FIX_SHIFT_EOL (0+2) +# define SF_FL_SHIFT_EOL (0+4) +#else +# define SF_FIX_SHIFT_EOL (+2) +# define SF_FL_SHIFT_EOL (+4) +#endif #define SF_FIX_BEFORE_SEOL (SF_BEFORE_SEOL << SF_FIX_SHIFT_EOL) #define SF_FIX_BEFORE_MEOL (SF_BEFORE_MEOL << SF_FIX_SHIFT_EOL) |