Add taint rethink to the todo list.

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

diff --git a/perl.h b/perl.h
index 59a21fa..5b7af54 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -2279,11 +2279,13 @@ struct ptr_tbl {
 #  define htovs(x)     vtohs(x)
 # endif
        /* otherwise default to functions in util.c */
+#ifndef htovs
 short htovs(short n);
 short vtohs(short n);
 long htovl(long n);
 long vtohl(long n);
 #endif
+#endif
 
 /* *MAX Plus 1. A floating point value.
    Hopefully expressed in a way that dodgy floating point can't mess up.
@@ -3609,14 +3611,14 @@ EXTCONST char * PL_AMG_names[NofAMmeth];
 END_EXTERN_C
 
 struct am_table {
-  long was_ok_sub;
+  U32 was_ok_sub;
   long was_ok_am;
   U32 flags;
   CV* table[NofAMmeth];
   long fallback;
 };
 struct am_table_short {
-  long was_ok_sub;
+  U32 was_ok_sub;
   long was_ok_am;
   U32 flags;
 };