perl-embperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Angus Lees <...@inodes.org>
Subject Various Embperl patches from the Debian package [2/3]
Date Fri, 03 Dec 2004 08:23:49 GMT
This one is needed for some architectures (m68k) where PTR2IV can
produce a signed (negative) result:

--- libembperl-perl-2.0rc2.orig/test/cmp/reqrec.htm
+++ libembperl-perl-2.0rc2/test/cmp/reqrec.htm
@@ -9,11 +9,11 @@
 $_[1] =  <br> 
 
 ^\$rec_rec  = Apache(::RequestRec)?=SCALAR\(0x.*?\)<br>
-^\$\$rec_rec = \d+<br>
+^\$\$rec_rec = -?\d+<br>
 
 ^Apache->request    = Apache(::RequestRec)?=SCALAR\(0x.*?\)<br>
-^\$\{Apache->request\} = \d+<br>
+^\$\{Apache->request\} = -?\d+<br>
 
 ${Apache->request} = $$req_rec ?  yes <br>
 
--- libembperl-perl-2.0rc2.orig/test/cmp/varepvar.htm
+++ libembperl-perl-2.0rc2/test/cmp/varepvar.htm
@@ -12,7 +12,7 @@
 ^\$\$rec_rec = -?\d+<br>
 
 ^Apache->request    = Apache(::RequestRec)?=SCALAR\(0x.*?\)<br>
-^\$\{Apache->request\} = \d+<br>
+^\$\{Apache->request\} = -?\d+<br>
 
 ${Apache->request} = $$req_rec ?  yes <br>
 


---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org


Mime
View raw message