Author: richter
Date: Wed Nov  9 12:46:38 2005
New Revision: 332139

URL: http://svn.apache.org/viewcvs?rev=332139&view=rev
Log:
make it work with Perl 5.005

Modified:
    perl/embperl/trunk/epnames.h

Modified: perl/embperl/trunk/epnames.h
URL: 
http://svn.apache.org/viewcvs/perl/embperl/trunk/epnames.h?rev=332139&r1=332138&r2=332139&view=diff
==============================================================================
--- perl/embperl/trunk/epnames.h (original)
+++ perl/embperl/trunk/epnames.h Wed Nov  9 12:46:38 2005
@@ -258,6 +258,9 @@
 #define XSprePUSH (sp = PL_stack_base + ax - 1)
 #endif
 
+#ifndef SvUTF8
+#define SvUTF8(x) 0
+#endif
 
 #if PERL_VERSION >= 5
 



---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to