diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1998-10-26 02:44:44 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-10-26 02:44:44 +0000 |
commit | b86a2fa703d0daf651095b1947eb50e3b5cc41d9 (patch) | |
tree | 4813808e1f50c63dc88e862ce9415eea78c08ade /gv.c | |
parent | ce9935e078582f01b05cad6db77c0a8312bee15b (diff) | |
download | perl-b86a2fa703d0daf651095b1947eb50e3b5cc41d9.tar.gz |
various win32 tweaks; disable new xs_cpp section (it creates
ambiguous inference graph for %.xs --> %.o)
p4raw-id: //depot/perl@2086
Diffstat (limited to 'gv.c')
-rw-r--r-- | gv.c | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -500,7 +500,9 @@ gv_fetchpv(char *nambeg, I32 add, I32 sv_type) /* No stash in name, so see how we can default */ if (!stash) { - if (isIDFIRST(*name) || (IN_UTF8 && ((*name & 0xc0) == 0xc0) && isIDFIRST_utf8(name))) { + if (isIDFIRST(*name) + || (IN_UTF8 && ((*name & 0xc0) == 0xc0) && isIDFIRST_utf8((U8*)name))) + { bool global = FALSE; if (isUPPER(*name)) { |