This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix various mad eval leaks
[perl5.git] / x2p / EXTERN.h
index 4a2d360..dcc1b24 100644 (file)
@@ -1,19 +1,20 @@
-/* $Header: EXTERN.h,v 4.0 91/03/20 01:56:53 lwall Locked $
+/*    EXTERN.h
  *
- *    Copyright (c) 1989, Larry Wall
+ *    Copyright (C) 1991, 1992, 1993, 1994, by Larry Wall and others
  *
- *    You may distribute under the terms of the GNU General Public License
- *    as specified in the README file that comes with the perl 3.0 kit.
- *
- * $Log:       EXTERN.h,v $
- * Revision 4.0  91/03/20  01:56:53  lwall
- * 4.0 baseline.
- * 
+ *    You may distribute under the terms of either the GNU General Public
+ *    License or the Artistic License, as specified in the README file.
  */
 
 #undef EXT
 #define EXT extern
 
+#ifdef __cplusplus
+#  define EXTERN_C extern "C"
+#else
+#  define EXTERN_C extern
+#endif
+
 #undef INIT
 #define INIT(x)