This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Move PAD(LIST) typedefs to perl.h
authorFather Chrysostomos <sprout@cpan.org>
Thu, 16 Aug 2012 05:11:46 +0000 (22:11 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 21 Aug 2012 23:51:13 +0000 (16:51 -0700)
otherwise they can only be used in some header files.

pad.h
perl.h

diff --git a/pad.h b/pad.h
index 712bdab..890ddd1 100644 (file)
--- a/pad.h
+++ b/pad.h
 */
 
 
-/* a padlist is currently just an AV; but that might change,
- * so hide the type. Ditto a pad.  */
-
-typedef AV PADLIST;
-typedef AV PAD;
-
-
 /* offsets within a pad */
 
 #if PTRSIZE == 4
diff --git a/perl.h b/perl.h
index 3a9490f..5be85c4 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -2442,6 +2442,11 @@ typedef struct ptr_tbl_ent PTR_TBL_ENT_t;
 typedef struct ptr_tbl PTR_TBL_t;
 typedef struct clone_params CLONE_PARAMS;
 
+/* a padlist is currently just an AV; but that might change,
+ * so hide the type. Ditto a pad.  */
+typedef AV PADLIST;
+typedef AV PAD;
+
 #include "handy.h"
 
 #if defined(USE_LARGE_FILES) && !defined(NO_64_BIT_RAWIO)