Author: leo
Date: Fri Mar 10 02:11:13 2006
New Revision: 11849
Modified:
trunk/t/pmc/sub.t
Log:
warning tests need .PerlUndef, not .Undef
Modified: trunk/t/pmc/sub.t
==============================================================================
--- trunk/t/pmc/sub.t (original)
+++ trunk/t/pmc/sub.t Fri Mar 10 02:11:13 2006
@@ -724,7 +724,7 @@
_f1()
.end
.sub _f1
- $P0 = new .Undef
+ $P0 = new .PerlUndef
print $P0
.end
CODE
@@ -735,7 +735,7 @@
.sub _main :main
.include "warnings.pasm"
_f1()
- $P0 = new .Undef
+ $P0 = new .PerlUndef
print $P0
print "ok\n"
.end
@@ -750,7 +750,7 @@
.sub _main :main
.include "warnings.pasm"
_f1()
- $P0 = new .Undef
+ $P0 = new .PerlUndef
print "back\n"
print $P0
print "ok\n"
@@ -758,7 +758,7 @@
.sub _f1
warningson .PARROT_WARNINGS_UNDEF_FLAG
_f2()
- $P0 = new .Undef
+ $P0 = new .PerlUndef
print $P0
.end
.sub _f2
