Return to 129.html CVS log

Up to [parser3project] / parser3 / tests

Annotation of parser3/tests/129.html, revision 1.3

1.3     ! misha       1: @main[]
1.2       paf         2: $table[^table::create{group    name
                      3: first  a
                      4: first  b
                      5: second c
                      6: third  d
                      7: third  e
                      8: }]
1.3     ! misha       9: 
        !            10: 
        !            11: <b>^$.distinct[tables]</b><br />
        !            12: ^print[^table.hash[group][
1.2       paf        13:        $.distinct[tables]
                     14: ]]
                     15: 
1.3     ! misha      16: 
        !            17: <hr />
        !            18: <b>^$.distinct(1) ^$.type[table]</b><br />
        !            19: ^print[^table.hash[group][
        !            20:        $.distinct(1)
        !            21:        $.type[table]
        !            22: ]]
        !            23: 
        !            24: 
        !            25: <hr />
        !            26: <b>^$.distinct(1) ^$.type[hash]</b><br />
        !            27: ^print[^table.hash[group][
        !            28:        $.distinct(1)
        !            29:        $.type[hash]
        !            30: ]]
        !            31: 
        !            32: 
        !            33: <hr />
        !            34: <b>^$.distinct(1) ^$.type[string]</b><br />
        !            35: ^try{
        !            36:        ^print[^table.hash[group][
        !            37:                $.distinct(1)
        !            38:                $.type[string]
        !            39:        ]]
        !            40: }{
        !            41:        ^if($exception.type eq parser.runtime){
        !            42:                failed, that's OK.
        !            43:                <br />with ^$.type[string] only one field must be specified
        !            44:                $exception.handled(1)
        !            45:        }
        !            46: }
        !            47: 
        !            48: 
        !            49: <hr />
        !            50: <b>^$.distinct(1) ^$.type[string]</b><br />
        !            51: ^print[^table.hash[group;name][
        !            52:        $.distinct(1)
        !            53:        $.type[string]
        !            54: ]]
        !            55: 
        !            56: 
        !            57: @print[hData][sKey;value]
        !            58: ^hData.foreach[sKey;value]{
        !            59:        $sKey ^if($value is "table"){^value.menu{$value.name}[,]}{^if($value is "string"){$value}{^if($value is "hash"){<blockquote>^print[$value]</blockquote>}}}<br />
1.2       paf        60: }