--- parser3/www/htdocs/Attic/_bug.html 2004/09/01 12:21:43 1.64 +++ parser3/www/htdocs/Attic/_bug.html 2004/12/23 14:40:54 1.73 @@ -1,13 +1,25 @@ -
-^mail:send[
-	$.from[from]
-	$.to[to]
-	$.html{
-	cid=xxx
-	}
-	$.file[
-		$.value[^file::load[binary;_bug.html]]
-#		$.content-disposition[inline]
-		$.content-disposition[]
-    ]
-]
\ No newline at end of file
+@main[]
+
+$cH[^cH[]]
+
+^if($cH.this is "junction"){
+		$result[^cH.this[$cH.th_par]]
+}{
+		$result[0]
+}
+
+####################################################################################################################
+
+@cH[]
+$result[
+		$.this[$mThis]
+		$.th_par[
+				$.a(2)
+				$.b(3)
+		]
+]
+####################################################################################################################
+
+@mThis[lparams][params]
+$params[^hash::create[$lparams]]
+$result[^eval($params.a * $params.b)]