summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorSteve Hay <SteveHay@planit.com>2005-10-17 10:14:46 +0000
committerSteve Hay <SteveHay@planit.com>2005-10-17 10:14:46 +0000
commit585ec06d680e861557397efeb05210638532c6dc (patch)
treed28fe8c8e4c0c72bc9128edb40834bf04f755a0d /toke.c
parenta0fd494844cc8648fdc5234c367fd018a12fdf3f (diff)
downloadperl-585ec06d680e861557397efeb05210638532c6dc.tar.gz
Make some casts explicit to keep VC++ 7 happy
Specifically, this silences the warnings from the following smoke: http://www.nntp.perl.org/group/perl.daily-build.reports/32258 (Hmm. Looks like you need to decode the base64 yourself before you can read that.) p4raw-id: //depot/perl@25779
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index 890e6815e9..ba3fbb1a1a 100644
--- a/toke.c
+++ b/toke.c
@@ -446,7 +446,7 @@ S_missingterm(pTHX_ char *s)
#endif
) {
*tmpbuf = '^';
- tmpbuf[1] = toCTRL(PL_multi_close);
+ tmpbuf[1] = (char)toCTRL(PL_multi_close);
tmpbuf[2] = '\0';
s = tmpbuf;
}