Diff for /parser3/tests/129.html between versions 1.1.2.1 and 1.4

version 1.1.2.1, 2003/04/11 10:57:24 version 1.4, 2008/05/29 10:02:35
Line 1 Line 1
   @main[]
 $table[^table::create{group     name  $table[^table::create{group     name
 first   a  first   a
 first   b  first   b
Line 5  second c Line 6  second c
 third   d  third   d
 third   e  third   e
 }]  }]
           
 $distinct_tables[^table.hash[group][  
         $.distinct[tables]  
 ]]  
   
 ^distinct_tables.foreach[key;table]{  
         $key ^table.menu{$table.name}[,]<br>  
 }  
   
   
   
   ^do[unique key, no value columns, no options]{
           ^table.hash[name]
   }
   
   
   ^do[non-unique key, no value columns, no options]{
           ^table.hash[group]
   }[if key not unique ^$.distinct(1) must be specified]
   
   
   ^do[non-unique key, no value columns, options: ^$.distinct[tables] (backward)]{
           ^table.hash[group][
                   $.distinct[tables]
           ]
   }
   
   
   ^do[non-unique key, no value columns, options: ^$.distinct[tables], ^$.type[hash] ]{
           ^table.hash[group][
                   $.distinct[tables]
                   $.type[hash]
           ]
   }[^$.distinct[tables] and ^$.type[...] can't be specified together]
   
   
   ^do[non-unique key, no value columns, options: ^$.distinct(1) ^$.type[table]]{
           ^table.hash[group][
                   $.distinct(1)
                   $.type[table]
           ]
   }
   
   
   ^do[non-unique key, no value columns, options: ^$.distinct(1) ^$.type[table]]{
           ^table.hash[group][
                   $.type[table]
           ]
   }[non unique key without distinct option]
   
   
   ^do[unique key, no value columns, options: ^$.type[table]]{
           ^table.hash[name][
                   $.type[table]
           ]
   }
   
   
   ^do[non-unique key, no value columns, options: ^$.distinct(1) ^$.type[hash]]{
           ^table.hash[group][
                   $.distinct(1)
                   $.type[hash]
           ]
   }
   
   
   ^do[non-unique key, no value columns, options: ^$.distinct(1) (as above because ^$.type[hash] == default)]{
           ^table.hash[group][
                   $.distinct(1)
           ]
   }
   
   
   ^do[non-unique key, no value columns, options: ^$.distinct(1) ^$.type[string]]{
           ^table.hash[group][
                   $.distinct(1)
                   $.type[string]
           ]
   }[with ^$.type[string] only one field must be specified]
   
   
   ^do[non-unique key, one value column (name), options: ^$.distinct(1) ^$.type[string]]{
           ^table.hash[group;name][
                   $.distinct(1)
                   $.type[string]
           ]
   }
   
   
   
   
   @do[sTitle;jCode;sExceptionComment][h]
   <h3>$sTitle</h3>
   ^try{
           $h[$jCode]
           ^print[$h]
   }{
           ^if($exception.type eq "parser.runtime"){
                   $exception.handled(1)
                   ^if(def $sExceptionComment){
                           failed, that's OK.<br />
                           $sExceptionComment
                   }{
                           something wrong
                   }
           }
   }
   
   
   
   @print[hData][sKey;value]
   ^hData.foreach[sKey;value]{
           $sKey ^if($value is "table"){^value.menu{$value.name}[,]}{^if($value is "string"){$value}{^if($value is "hash"){<blockquote>^print[$value]</blockquote>}}}<br />
   }

Removed from v.1.1.2.1  
changed lines
  Added in v.1.4


E-mail: