summaryrefslogtreecommitdiff
path: root/embed.h
diff options
context:
space:
mode:
authorRoca, Ignasi <ignasi.roca@fujitsu.siemens.es>2000-10-20 15:17:27 +0100
committerJarkko Hietaniemi <jhi@iki.fi>2000-10-20 20:44:31 +0000
commitb73d6f5067e468c85b81d9c800ab577f770b45b3 (patch)
tree26fbd8edbcc23dfd82cd6a2bf06816b43348391c /embed.h
parent20141f0ebfa7c09c3e5e502bba1c4e6e40b3072c (diff)
downloadperl-b73d6f5067e468c85b81d9c800ab577f770b45b3.tar.gz
Make scan_num() reëntrant, as suggested in
Subject: [PATCH perl@7229] Rentrant parser and yylex() Message-ID: <5930DC161690D211966700902715754702DA09CD@madt009a.siemens.es> p4raw-id: //depot/perl@7382
Diffstat (limited to 'embed.h')
-rw-r--r--embed.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/embed.h b/embed.h
index b73e25fdb4..b4c8f6ab35 100644
--- a/embed.h
+++ b/embed.h
@@ -2069,7 +2069,7 @@
#define scalarvoid(a) Perl_scalarvoid(aTHX_ a)
#define scan_bin(a,b,c) Perl_scan_bin(aTHX_ a,b,c)
#define scan_hex(a,b,c) Perl_scan_hex(aTHX_ a,b,c)
-#define scan_num(a) Perl_scan_num(aTHX_ a)
+#define scan_num(a,b) Perl_scan_num(aTHX_ a,b)
#define scan_oct(a,b,c) Perl_scan_oct(aTHX_ a,b,c)
#define scope(a) Perl_scope(aTHX_ a)
#define screaminstr(a,b,c,d,e,f) Perl_screaminstr(aTHX_ a,b,c,d,e,f)