You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl-cvs@perl.apache.org by ri...@apache.org on 2007/01/23 07:58:46 UTC
svn commit: r498941 - in /perl/embperl/trunk: Changes.pod epinit.c
Author: richter
Date: Mon Jan 22 22:58:44 2007
New Revision: 498941
URL: http://svn.apache.org/viewvc?view=rev&rev=498941
Log:
- Fixed missing Perl Stack setup which causes memory errors on
BSD systems. Patch from Doug Rayner.
Modified:
perl/embperl/trunk/Changes.pod
perl/embperl/trunk/epinit.c
Modified: perl/embperl/trunk/Changes.pod
URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Changes.pod?view=diff&rev=498941&r1=498940&r2=498941
==============================================================================
--- perl/embperl/trunk/Changes.pod (original)
+++ perl/embperl/trunk/Changes.pod Mon Jan 22 22:58:44 2007
@@ -17,6 +17,8 @@
attribute is removed. Spotted by Andrew Sitnikov.
- Make component -> curr_esc_mode available in Perl, requested
by Robert.
+ - Fixed missing Perl Stack setup which causes memory errors on
+ BSD systems. Patch from Doug Rayner.
=head1 2.2.0 8. Apr. 2006
Modified: perl/embperl/trunk/epinit.c
URL: http://svn.apache.org/viewvc/perl/embperl/trunk/epinit.c?view=diff&rev=498941&r1=498940&r2=498941
==============================================================================
--- perl/embperl/trunk/epinit.c (original)
+++ perl/embperl/trunk/epinit.c Mon Jan 22 22:58:44 2007
@@ -966,11 +966,19 @@
preload = 0 ;
}
}
- if (preload)
+ if (preload)
+ {
+ dSP;
+ PUSHMARK(sp) ;
perl_call_pv ("Embperl::PreLoadFiles", G_DISCARD) ;
+ }
}
#else
+ {
+ dSP;
+ PUSHMARK(sp) ;
perl_call_pv ("Embperl::PreLoadFiles", G_DISCARD) ;
+ }
#endif
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-cvs-help@perl.apache.org