diff options
| author | Larry Wall <lwall@jpl-devvax.jpl.nasa.gov> | 1990-02-28 21:55:09 +0000 |
|---|---|---|
| committer | Larry Wall <lwall@jpl-devvax.jpl.nasa.gov> | 1990-02-28 21:55:09 +0000 |
| commit | ac58e20f744208e9bff2115708a2f1c4e2e2175f (patch) | |
| tree | 1610ffeb1ed9dc24b5bf864c012a6d9fe7ac6720 /regcomp.c | |
| parent | afd9f252e30d37007c653bd21680f0b5f6c32608 (diff) | |
| download | perl-ac58e20f744208e9bff2115708a2f1c4e2e2175f.tar.gz | |
perl 3.0 patch #11 patch #9, continued
See patch #9.
Diffstat (limited to 'regcomp.c')
| -rw-r--r-- | regcomp.c | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -7,9 +7,12 @@ * blame Henry for some of the lack of readability. */ -/* $Header: regcomp.c,v 3.0.1.1 89/11/11 04:51:04 lwall Locked $ +/* $Header: regcomp.c,v 3.0.1.2 90/02/28 18:08:35 lwall Locked $ * * $Log: regcomp.c,v $ + * Revision 3.0.1.2 90/02/28 18:08:35 lwall + * patch9: /[\200-\377]/ didn't work on machines with signed chars + * * Revision 3.0.1.1 89/11/11 04:51:04 lwall * patch2: /[\000]/ didn't work * @@ -770,6 +773,7 @@ register int c; { if (regcode == ®dummy) return; + c &= 255; if (def) bits[c >> 3] &= ~(1 << (c & 7)); else |