Change 29520 by [EMAIL PROTECTED] on 2006/12/11 20:55:20
Rename FBM_TABLE_OFFSET to PERL_FBM_TABLE_OFFSET prior to moving it
to a header.
Affected files ...
... //depot/perl/util.c#594 edit
Differences ...
==== //depot/perl/util.c#594 (text) ====
Index: perl/util.c
--- perl/util.c#593~29518~ 2006-12-11 10:26:31.000000000 -0800
+++ perl/util.c 2006-12-11 12:55:20.000000000 -0800
@@ -454,7 +454,7 @@
return NULL;
}
-#define FBM_TABLE_OFFSET 2 /* Number of bytes between EOS and table*/
+#define PERL_FBM_TABLE_OFFSET 2 /* Number of bytes between EOS and
table*/
/* As a space optimization, we do not compile tables for strings of length
0 and 1, and for strings of length 2 unless FBMcf_TAIL. These are
@@ -499,9 +499,10 @@
const U8 mlen = (len>255) ? 255 : (U8)len;
register U8 *table;
- Sv_Grow(sv, len + 256 + FBM_TABLE_OFFSET);
- table = (unsigned char*)(SvPVX_mutable(sv) + len + FBM_TABLE_OFFSET);
- s = table - 1 - FBM_TABLE_OFFSET; /* last char */
+ Sv_Grow(sv, len + 256 + PERL_FBM_TABLE_OFFSET);
+ table
+ = (unsigned char*)(SvPVX_mutable(sv) + len + PERL_FBM_TABLE_OFFSET);
+ s = table - 1 - PERL_FBM_TABLE_OFFSET; /* last char */
memset((void*)table, mlen, 256);
table[-1] = (U8)flags;
i = 0;
@@ -686,7 +687,8 @@
return NULL;
{
- register const unsigned char * const table = little + littlelen +
FBM_TABLE_OFFSET;
+ register const unsigned char * const table
+ = little + littlelen + PERL_FBM_TABLE_OFFSET;
register const unsigned char *oldlittle;
--littlelen; /* Last char found by table lookup */
End of Patch.
