Author: allison
Date: Sun Sep 30 21:38:22 2007
New Revision: 21705
Modified:
branches/pdd15oo/compilers/pge/PGE/OPTable.pir
Log:
[pdd15oo] Undefined attributes return Undef instead of PMCNULL in the new
metamodel, because the attribute store is just an array.
Modified: branches/pdd15oo/compilers/pge/PGE/OPTable.pir
==============================================================================
--- branches/pdd15oo/compilers/pge/PGE/OPTable.pir (original)
+++ branches/pdd15oo/compilers/pge/PGE/OPTable.pir Sun Sep 30 21:38:22 2007
@@ -296,7 +296,8 @@
wspos = pos
if pos >= lastpos goto oper_not_found
## check for leading whitespace -- it may limit token candidates
- if null ws goto token_next_ws
+ $I0 = defined ws
+ unless $I0 goto token_next_ws
mpos = pos
$P0 = ws(mob)
unless $P0 goto token_next_1
