INSTALL didn't mention the 5.8.2 hash changes. Fixed

[perl5.git] / embed.h

diff --git a/embed.h b/embed.h
index 66c1e09..808e010 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -2,7 +2,7 @@
  *    embed.h
  *
  *    Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999,
- *    2000, 2001, 2002, 2003, by Larry Wall and others
+ *    2000, 2001, 2002, 2003, 2004, by Larry Wall and others
  *
  *    You may distribute under the terms of either the GNU General Public
  *    License or the Artistic License, as specified in the README file.
@@ -738,6 +738,7 @@
 #define new_version            Perl_new_version
 #define upg_version            Perl_upg_version
 #define vnumify                        Perl_vnumify
+#define vnormal                        Perl_vnormal
 #define vstringify             Perl_vstringify
 #define vcmp                   Perl_vcmp
 #ifdef PERL_CORE
@@ -1138,11 +1139,6 @@
 #ifdef PERL_CORE
 #define yyerror                        Perl_yyerror
 #endif
-#ifdef USE_PURE_BISON
-#ifdef PERL_CORE
-#define yylex_r                        Perl_yylex_r
-#endif
-#endif
 #ifdef PERL_CORE
 #define yylex                  Perl_yylex
 #endif
@@ -2194,7 +2190,6 @@
 #define ck_sort                        Perl_ck_sort
 #define ck_spair               Perl_ck_spair
 #define ck_split               Perl_ck_split
-#define ck_state               Perl_ck_state
 #define ck_subr                        Perl_ck_subr
 #define ck_substr              Perl_ck_substr
 #define ck_svconst             Perl_ck_svconst
@@ -3241,6 +3236,7 @@
 #define new_version(a)         Perl_new_version(aTHX_ a)
 #define upg_version(a)         Perl_upg_version(aTHX_ a)
 #define vnumify(a)             Perl_vnumify(aTHX_ a)
+#define vnormal(a)             Perl_vnormal(aTHX_ a)
 #define vstringify(a)          Perl_vstringify(aTHX_ a)
 #define vcmp(a,b)              Perl_vcmp(aTHX_ a,b)
 #ifdef PERL_CORE
@@ -3640,11 +3636,6 @@
 #ifdef PERL_CORE
 #define yyerror(a)             Perl_yyerror(aTHX_ a)
 #endif
-#ifdef USE_PURE_BISON
-#ifdef PERL_CORE
-#define yylex_r(a,b)           Perl_yylex_r(aTHX_ a,b)
-#endif
-#endif
 #ifdef PERL_CORE
 #define yylex()                        Perl_yylex(aTHX)
 #endif
@@ -3926,13 +3917,13 @@
 #define nuke_stacks()          S_nuke_stacks(aTHX)
 #endif
 #ifdef PERL_CORE
-#define open_script(a,b,c,d)   S_open_script(aTHX_ a,b,c,d)
+#define open_script(a,b,c)     S_open_script(aTHX_ a,b,c)
 #endif
 #ifdef PERL_CORE
 #define usage(a)               S_usage(aTHX_ a)
 #endif
 #ifdef PERL_CORE
-#define validate_suid(a,b,c)   S_validate_suid(aTHX_ a,b,c)
+#define validate_suid(a,b)     S_validate_suid(aTHX_ a,b)
 #endif
 #  if defined(IAMSUID)
 #ifdef PERL_CORE
@@ -4351,7 +4342,7 @@
 #define not_a_number(a)                S_not_a_number(aTHX_ a)
 #endif
 #ifdef PERL_CORE
-#define visit(a)               S_visit(aTHX_ a)
+#define visit(a,b,c)           S_visit(aTHX_ a,b,c)
 #endif
 #ifdef PERL_CORE
 #define sv_add_backref(a,b)    S_sv_add_backref(aTHX_ a,b)
@@ -4691,7 +4682,6 @@
 #define ck_sort(a)             Perl_ck_sort(aTHX_ a)
 #define ck_spair(a)            Perl_ck_spair(aTHX_ a)
 #define ck_split(a)            Perl_ck_split(aTHX_ a)
-#define ck_state(a)            Perl_ck_state(aTHX_ a)
 #define ck_subr(a)             Perl_ck_subr(aTHX_ a)
 #define ck_substr(a)           Perl_ck_substr(aTHX_ a)
 #define ck_svconst(a)          Perl_ck_svconst(aTHX_ a)