save_hints is a mathom.

p4raw-id: //depot/perl@25900

1 files changed, 7 insertions, 0 deletions

diff --git a/mathoms.c b/mathoms.c
index 6d03a6cee1..920652564c 100644
--- 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