--- parser3/www/htdocs/Attic/_bug.html 2004/07/28 13:43:58 1.58
+++ parser3/www/htdocs/Attic/_bug.html 2004/12/23 14:40:54 1.73
@@ -1,30 +1,25 @@
-$t[^table::create{c
-515
-516
-517
-518
-519
-520
-521
-522
-523
-501
-502
-506
-507
-508
-509à,
-509
-509
-510
-511
-512
-513/513à
-}]
+@main[]
-#^throw[paf;
-^t.menu{
- $t.c -- ^t.c.int(0)
+$cH[^cH[]]
+^if($cH.this is "junction"){
+ $result[^cH.this[$cH.th_par]]
+}{
+ $result[0]
}
-#]
\ No newline at end of file
+
+####################################################################################################################
+
+@cH[]
+$result[
+ $.this[$mThis]
+ $.th_par[
+ $.a(2)
+ $.b(3)
+ ]
+]
+####################################################################################################################
+
+@mThis[lparams][params]
+$params[^hash::create[$lparams]]
+$result[^eval($params.a * $params.b)]