Return to 180.html CVS log

Up to [parser3project] / parser3 / tests

Annotation of parser3/tests/180.html, revision 1.2

1.1       misha       1: @main[][tList;dLong;sErr]
                      2: $tList[^table::create{sIP      z
                      3: 10.0.0.2       167772161
                      4: 213.152.135.132
                      5: 255.255.255.254
                      6: 255.255.255.255
                      7: 10.0.0..2
                      8: 10.1
                      9: .10.1.1.1
                     10: 10.1.1.
                     11:        z
                     12: }]
                     13: 
                     14: 
                     15: <table border="1">
                     16:        <tr>
                     17:                <td>IP</td>
1.2     ! misha      18:                <td>^^inet:aton[IP]</td>
        !            19:                <td>^^inet:ntoa(^^inet:aton[IP])</td>
1.1       misha      20:        </tr>
                     21:        ^tList.menu{
                     22:                $dLong[]
1.2     ! misha      23:                $sErr[^safe{$dLong(^inet:aton[$tList.sIP])}]
1.1       misha      24:                <tr>
                     25:                        <td>$tList.sIP</td>
                     26:                        <td>^if(def $dLong){^dLong.format[%u]}{$sErr}</td>
1.2     ! misha      27:                        <td>^if(def $dLong){^safe{^inet:ntoa($dLong)}}{&mdash^;}</td>
1.1       misha      28:                </tr>
                     29:        }
                     30: </table>
                     31: 
                     32: 
                     33: 
                     34: @safe[jCode]
                     35: ^try{
                     36:        $result[$jCode]
                     37: }{
                     38:        $exception.handled(1)
                     39:        $result[$exception.comment]
                     40: }