--- parser3/www/htdocs/Attic/_bug.html	2004/03/05 10:00:05	1.27
+++ parser3/www/htdocs/Attic/_bug.html	2004/12/23 14:51:32	1.74
@@ -1,10 +1,41 @@
-$request:charset[koi8-r]
-$response:charset[windows-1251]
+@print[title;hash][key;value]
+<p>$title ^hash.foreach[key;value]{$key}[ | ]</p>
+=$hash.[zzz].rrggbb=
 
-$SQL.connect-string[odbc://DSN=nestle^;UID=nestle^;PWD=mbm32^;ClientCharset=windows-1251]
-#$SQL.connect-string[odbc://DSN=theatre_enciclop^;UID=root^;PWD=^;bug=here]
-#^bpt[]
-^connect[$SQL.connect-string]{
-	^string:sql{select question from faq}[$.limit(1)]
+@main[]
+$table[^table::create{color	rrggbb
+red	ff0000
+green	00ff00
+blue	0000ff
+_default	000000}
+]
+
+$c_hash[
+	$.red[
+		$.color[red]
+		$.rrggbb[ff0000]
+	]
+	$.green[
+		$.color[green]
+		$.rrggbb[00ff00]
+	]
+	$.blue[
+		$.color[blue]
+		$.rrggbb[0000ff]
+	]
+	$._default[
+		$.color[_default]
+		$.rrggbb[000000]
+	]
+]
+
+$a_hash[^table.hash[color]]
+^print[a_hash:;$a_hash]
+
+$b_hash[^hash::create[]]
+^table.menu{
+	^b_hash.add[$.[$table.color][$table.fields]]
 }
-OK
+^print[b_hash:;$b_hash]
+
+^print[c_hash:;$c_hash]
\ No newline at end of file