--- parser3/www/htdocs/Attic/_bug.html 2004/12/23 14:40:54 1.73
+++ parser3/www/htdocs/Attic/_bug.html 2005/01/20 14:10:29 1.80
@@ -1,25 +1,29 @@
@main[]
-
-$cH[^cH[]]
-
-^if($cH.this is "junction"){
- $result[^cH.this[$cH.th_par]]
-}{
- $result[0]
+^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]
+}
+^if(!def $error){
+ working2
-####################################################################################################################
-
-@cH[]
-$result[
- $.this[$mThis]
- $.th_par[
- $.a(2)
- $.b(3)
- ]
-]
-####################################################################################################################
+ ^if(^math:random(2)){
+ $error[uzhas,test2]
+ }
+ ^if(!def $error){
+ working3
+ }
+}
-@mThis[lparams][params]
-$params[^hash::create[$lparams]]
-$result[^eval($params.a * $params.b)]