Return to auto.p CVS log

Up to [parser3project] / parser3 / tests / results

Annotation of parser3/tests/results/auto.p, revision 1.25

1.2       misha       1: @conf[filespec]
                      2: $CHARSETS[
                      3:        $.windows-1251[../etc/parser3.charsets/windows-1251.cfg]
                      4: ]
                      5: 
1.3       misha       6: $CLASS_PATH[^table::create{path
                      7: /
                      8: /tests
                      9: }]
                     10: 
1.7       moko       11: $NO_PROTOTYPE[
1.8       moko       12:        $.[336.html][yes]
                     13:        $.[225.html][yes]
                     14:        $.[051.html][yes]
1.7       moko       15: ]
                     16: 
                     17: ^if(def $NO_PROTOTYPE.[$env:PATH_TRANSLATED]){
                     18:        $OBJECT-PROTOTYPE(false)
                     19: }
1.2       misha      20: 
1.8       moko       21: ^if($env:PATH_TRANSLATED eq '357.html'){
1.9       moko       22:        $LIMITS[
                     23:                $.max_loop(50)
1.22      moko       24:                $.max_recursion(50)
1.9       moko       25:        ]
1.8       moko       26: }
                     27: ^if($env:PATH_TRANSLATED eq '358.html'){
1.9       moko       28:        $LIMITS[
                     29:                $.max_loop(0)
                     30:                $.max_recoursion(0)
                     31:        ]
1.8       moko       32: }
1.15      moko       33: ^if($env:PATH_TRANSLATED eq '380.html' || $env:PATH_TRANSLATED eq '394-curl.html' ){
1.10      moko       34:        $LIMITS[
                     35:                $.max_file_size(10000)
                     36:        ]
                     37: }
1.8       moko       38: 
1.16      moko       39: ^if($env:PATH_TRANSLATED eq '403.html'){
                     40:        $MIME-TYPES[^table::create{ext  mime-type
                     41: txt    text/plain
                     42: html   text/html
                     43: }]
                     44: }
                     45: 
1.17      moko       46: ^if($env:PATH_TRANSLATED eq '409.html'){
                     47:        $LOCALS(true)
                     48: }
                     49: 
                     50: ^if($env:PATH_TRANSLATED eq '410.html'){
                     51:        $CLASS-GETTER-PROTECTED(false)
                     52: }
1.5       misha      53: 
1.24      moko       54: ^os[;]{ ^curl:options[ $.library[libcurl.4.dylib] ] }
                     55: 
1.1       paf        56: @auto[]
1.4       misha      57: 
                     58: 
1.6       misha      59: @try-catch[jCode]
                     60: ^try{$jCode}{
                     61:        $exception.handled(true)
1.21      moko       62:        Exception type: $exception.type,
1.6       misha      63:        Source: $exception.source,
1.19      moko       64:        Comment: ^taint[as-is;$exception.comment]
1.6       misha      65: }
                     66: 
                     67: 
1.23      moko       68: @try-catch-filtered[jCode;limit]
                     69: ^try{$jCode}{
                     70:        $exception.handled(true)
                     71:        Exception type: $exception.type,
                     72:        Source: $exception.source^if(def $limit){,
                     73:        Comment: ^exception.comment.left($limit)}
                     74: }
                     75: 
                     76: 
1.20      moko       77: @try-catch-comment[jCode]
                     78: ^try{$jCode}{
                     79:        $exception.handled(true)
                     80:        Exception: ^taint[as-is;$exception.comment]
                     81: }
                     82: 
                     83: 
1.5       misha      84: @1251[]
                     85: ^from-1251[]
                     86: ^to-1251[]
                     87: 
                     88: 
                     89: @from-1251[]
1.4       misha      90: $request:charset[windows-1251]
1.5       misha      91: 
                     92: 
                     93: @to-1251[]
1.4       misha      94: $response:charset[windows-1251]
1.5       misha      95: 
                     96: 
                     97: # backward
                     98: @windows-1251[]
                     99: ^1251[]
1.11      moko      100: 
1.24      moko      101: @os[win;unix;mac][name]
1.12      moko      102: $name[^env:OS.left(7)]
1.25    ! moko      103: $result[^if(^name.lower[] eq 'windows'){$win}{^if(^env:HOME.left(6) eq '/Users' && def $mac){$mac;$unix}}]