Added John's perl5 patches

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@4310 626c5289-ae23-0410-ae9c-e8d60b6d4f22

SWIG/Lib/perl5/extra-install.list

@@ -1,2 +1,2 @@
 # see top-level Makefile.in
-Makefile.pl
+Makefile.pl noembed.h

SWIG/Lib/perl5/noembed.h

@@ -0,0 +1,51 @@
+#ifdef do_open
+  #undef do_open
+#endif
+#ifdef do_close
+  #undef do_close
+#endif
+#ifdef scalar
+  #undef scalar
+#endif
+#ifdef list
+  #undef list
+#endif
+#ifdef apply
+  #undef apply
+#endif
+#ifdef convert
+  #undef convert
+#endif
+#ifdef Error
+  #undef Error
+#endif
+#ifdef form
+  #undef form
+#endif
+#ifdef vform
+  #undef vform
+#endif
+#ifdef LABEL
+  #undef LABEL
+#endif
+#ifdef METHOD
+  #undef METHOD
+#endif
+#ifdef Move
+  #undef Move
+#endif
+#ifdef yylex
+  #undef yylex
+#endif
+#ifdef yyparse
+  #undef yyparse
+#endif
+#ifdef yyerror
+  #undef yyerror
+#endif
+#ifdef invert
+  #undef invert
+#endif
+#ifdef ref
+  #undef ref
+#endif

SWIG/Lib/perl5/perl5.swg

@@ -6,6 +6,7 @@
 
 %runtime "common.swg"         // common type checking code
 %runtime "perlrun.swg"        // Perl runtime functions
+%runtime "noembed.h"          // undefine Perl5 macros
 
 /* Typemaps for input parameters */