--- parser3/www/htdocs/Attic/_bug.html 2004/02/26 14:37:31 1.11
+++ parser3/www/htdocs/Attic/_bug.html 2004/03/23 09:43:44 1.33
@@ -1,6 +1,17 @@
-@main[]
-$file[^file::load[text;_bug.p]]
-^process[$self]{$file.text}[
- $.file[$file.name]
- $.lineno(-1)
+@main2[]
+^switch[2]{
+ ^case(1){one}
+ ^case[DEFAULT]{def}
+}
+
+
+@get[]
+$result[
+ $._default{^math:random(10)}
]
+#end @getBasketData[]
+
+@main[]
+$h[^get[]]
+
+=$h.1=
\ No newline at end of file