This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
save_hints is a mathom.
authorNicholas Clark <nick@ccl4.org>
Sun, 30 Oct 2005 16:45:34 +0000 (16:45 +0000)
committerNicholas Clark <nick@ccl4.org>
Sun, 30 Oct 2005 16:45:34 +0000 (16:45 +0000)
p4raw-id: //depot/perl@25900

mathoms.c
op.c

index 6d03a6c..9206525 100644 (file)
--- a/mathoms.c
+++ b/mathoms.c
@@ -741,6 +741,13 @@ Perl_init_i18nl14n(pTHX_ int printwarn)
     return init_i18nl10n(printwarn);
 }
 
+/* XXX kept for BINCOMPAT only */
+void
+Perl_save_hints(pTHX)
+{
+    Perl_croak(aTHX_ "internal error: obsolete function save_hints() called");
+}
+
 /*
  * Local variables:
  * c-indentation-style: bsd
diff --git a/op.c b/op.c
index 4ec189e..235b6a1 100644 (file)
--- a/op.c
+++ b/op.c
@@ -1871,13 +1871,6 @@ Perl_scope(pTHX_ OP *o)
     return o;
 }
 
-/* XXX kept for BINCOMPAT only */
-void
-Perl_save_hints(pTHX)
-{
-    Perl_croak(aTHX_ "internal error: obsolete function save_hints() called");
-}
-
 int
 Perl_block_start(pTHX_ int full)
 {