Integrate change #9012 from maintperl into mainline,
Jarkko Hietaniemi [Sun, 4 Mar 2001 18:23:58 +0000 (18:23 +0000)]
quench a compiler warning.

p4raw-link: @9012 on //depot/maint-5.6/perl: 8cbd449d930e1c59a4de92147cce022b8fa8f4a4

p4raw-id: //depot/perl@9020
p4raw-integrated: from //depot/maint-5.6/perl@9012 'merge in' toke.c
(@9010..)

toke.c

diff --git a/toke.c b/toke.c
index e312c4e..063ccd1 100644 (file)
--- a/toke.c
+++ b/toke.c
@@ -1245,7 +1245,7 @@ S_scan_const(pTHX_ char *start)
                    char *e = d++;
                    while (e-- > c)
                        *(e + 1) = *e;
-                   *c = 0xff;
+                   *c = (char)0xff;
                    /* mark the range as done, and continue */
                    dorange = FALSE;
                    didrange = TRUE;