--- parser3/www/htdocs/Attic/_bug.html 2005/01/20 14:10:29 1.80
+++ parser3/www/htdocs/Attic/_bug.html 2006/04/09 13:38:48 1.117
@@ -1,29 +1,42 @@
-@main[]
-^first[]
-^if(def $error){
- ^if(^error.pos[koshmar]>=0){
- $error, TODO:recover
- }{
- $error, TODO:die
- }
-}
-@first[]
-^second[]
-^if(!def $error){
- working1
-}
-@second[]
-^if(^math:random(2)){
- $error[koshmar,test1]
+
+$hash[
+ $.1(1)
+ $.2(2)
+]
+^hash.foreach[k;v]{
+ k=$k,v=$v^break[];!
}
-^if(!def $error){
- working2
- ^if(^math:random(2)){
- $error[uzhas,test2]
- }
- ^if(!def $error){
- working3
- }
+$table[^table::create{a
+1
+2
+3}]
+^table.menu{
+ <$table.a^if($table.a==2){^break[]!}>
+}[,]
+-------------
+
+^while(1<2){
+ $i($i+1)
+ ^if(1<3){
+ {
+ <$i^if($i==3){^break[]}>
+ }
+ }
}
+^for[i](1;3){
+ $i before
+ ^if($i==2){^continue[]}
+ after
+}[,]
+
+$response:paf[test]
+$response:paf[]
+---
+$hashfile[^hashfile::open[hf]]
+$hashfile.1(1)
+$hashfile.2(2)
+^hashfile.foreach[k;v]{
+ k=$k,v=$v^break[];!
+}