Author: jonathan
Date: Mon Mar 31 13:58:33 2008
New Revision: 26673
Modified:
trunk/compilers/pct/src/PAST/Compiler.pir
Log:
[PCT] Generalize iterator code in for loop to use iter rather than to create an
Iterator object. This means that objects that want to supply their own
iterators can do so.
Modified: trunk/compilers/pct/src/PAST/Compiler.pir
==============================================================================
--- trunk/compilers/pct/src/PAST/Compiler.pir (original)
+++ trunk/compilers/pct/src/PAST/Compiler.pir Mon Mar 31 13:58:33 2008
@@ -710,7 +710,7 @@
$S0 = ops.'unique'('$I')
ops.'push_pirop'('defined', $S0, collpost)
ops.'push_pirop'('unless', $S0, endlabel)
- ops.'push_pirop'('new', iter, '"Iterator"', collpost)
+ ops.'push_pirop'('iter', iter, collpost)
ops.'push'(looplabel)
ops.'push_pirop'('unless', iter, endlabel)
