Reindent a section of the file.

[p5sagit/p5-mst-13.2.git] / embed.h

diff --git a/embed.h b/embed.h
index 8f8853f..5907e20 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -1543,7 +1543,7 @@
 #define doeval                 S_doeval
 #endif
 #ifdef PERL_CORE
-#define doopen_pmc             S_doopen_pmc
+#define doopen_pm              S_doopen_pm
 #endif
 #ifdef PERL_CORE
 #define path_is_absolute       S_path_is_absolute
@@ -2128,9 +2128,6 @@
 #define cv_dump                        S_cv_dump
 #endif
 #  endif
-#ifdef PERL_CORE
-#define cv_clone2              S_cv_clone2
-#endif
 #endif
 #ifdef PERL_CORE
 #define find_runcv             Perl_find_runcv
@@ -4018,7 +4015,7 @@
 #define doeval(a,b,c,d)                S_doeval(aTHX_ a,b,c,d)
 #endif
 #ifdef PERL_CORE
-#define doopen_pmc(a,b)                S_doopen_pmc(aTHX_ a,b)
+#define doopen_pm(a,b)         S_doopen_pm(aTHX_ a,b)
 #endif
 #ifdef PERL_CORE
 #define path_is_absolute(a)    S_path_is_absolute(aTHX_ a)
@@ -4595,16 +4592,13 @@
 #endif
 #if defined(PERL_IN_PAD_C) || defined(PERL_DECL_PROT)
 #ifdef PERL_CORE
-#define pad_findlex(a,b,c)     S_pad_findlex(aTHX_ a,b,c)
+#define pad_findlex(a,b,c,d,e,f,g)     S_pad_findlex(aTHX_ a,b,c,d,e,f,g)
 #endif
 #  if defined(DEBUGGING)
 #ifdef PERL_CORE
 #define cv_dump(a,b)           S_cv_dump(aTHX_ a,b)
 #endif
 #  endif
-#ifdef PERL_CORE
-#define cv_clone2(a,b)         S_cv_clone2(aTHX_ a,b)
-#endif
 #endif
 #ifdef PERL_CORE
 #define find_runcv(a)          Perl_find_runcv(aTHX_ a)