--- parser3/www/htdocs/Attic/index.html 2002/10/14 13:53:21 1.160 +++ parser3/www/htdocs/Attic/index.html 2002/10/15 10:09:52 1.163 @@ -244,7 +244,6 @@ $response:charset[windows-1251] #^zeroinstdin[] #^shifts[] #^jspace[] -#^user-foreach-test[] #^hashselfmodification[] #^emptyTransformResult[] #^badxdoccreate[] @@ -261,7 +260,35 @@ $response:charset[windows-1251] #^touchittest[] #^touchittest2[] #^opauto[] -^trycontextt[] +#^trycontextt[] +#^tfor[] +#^user-foreach-test[] +#^includet[] +#^derived:includet[] +^fortestsep[] + +@fortestsep[][i] +^for[i](1;3){$i}[,] + +@includet[] +^include[some.p] +^included_method[2] + +@user-foreach-test[][key;value] +^user-foreach[key;value]{$key=$value
} + +@user-foreach[key;value;code] +^for[i](1;10){ + $caller.$key($i) + $caller.$value($i*2) + $code +} + + +@tfor[][i] +^for[i](1;10){ +$i +} @trycontextt[] ^try{ @@ -351,16 +378,6 @@ $i[before] $i -@user-foreach-test[][key;value] -^user-foreach[key;value]{$key=$value
} - -@user-foreach[key;value;code] -^for[i](1;10){ - $code.$key($i) - $code.$value($i*2) - $code -} - @jspace[] $a(1) ^jspace_call{^eval($a*2)}