[BACK]Return to _bug.html CVS log [TXT] [DIR] Up to [parser3project] / parser3 / www / htdocs

Diff for /parser3/www/htdocs/Attic/_bug.html between versions 1.48 and 1.74

version 1.48, 2004/06/18 15:55:47 version 1.74, 2004/12/23 14:51:32
Line 1 Line 1
 ^connect[oracle://mts_imprimatur2:imp2@mts]{  @print[title;hash][key;value]
 #    ^void:sql{create table paf(a clob)}  <p>$title ^hash.foreach[key;value]{$key}[ | ]</p>
 #    ^void:sql{insert into paf (a) values (/**a**/'a')}  =$hash.[zzz].rrggbb=
 #    ^void:sql{insert into paf (a) values (:unk)}  
         ^void:sql{delete from pif}  @main[]
         ^void:sql{call paf(:a)}[  $table[^table::create{color     rrggbb
                 $.bind[  red     ff0000
                         $.a[2]  green   00ff00
                 ]  blue    0000ff
   _default        000000}
   ]
   
   $c_hash[
           $.red[
                   $.color[red]
                   $.rrggbb[ff0000]
           ]
           $.green[
                   $.color[green]
                   $.rrggbb[00ff00]
           ]
           $.blue[
                   $.color[blue]
                   $.rrggbb[0000ff]
         ]          ]
         ^int:sql{select count(*) from pif}          $._default[
         "^string:sql{select a from pif}"                  $.color[_default]
                   $.rrggbb[000000]
           ]
   ]
   
   $a_hash[^table.hash[color]]
   ^print[a_hash:;$a_hash]
   
 #       ^string:sql{select a from paf}  $b_hash[^hash::create[]]
         OK  ^table.menu{
           ^b_hash.add[$.[$table.color][$table.fields]]
 }  }
   ^print[b_hash:;$b_hash]
   
   ^print[c_hash:;$c_hash]
   
Removed from v.1.48  
changed lines
  Added in v.1.74

E-mail: