Annotation of parser3/tests/results/auto.p, revision 1.21
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)
24: $.max_recoursion(50)
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.1 paf 54: @auto[]
1.4 misha 55:
56:
1.6 misha 57: @try-catch[jCode]
58: ^try{$jCode}{
59: $exception.handled(true)
1.21 ! moko 60: Exception type: $exception.type,
1.6 misha 61: Source: $exception.source,
1.19 moko 62: Comment: ^taint[as-is;$exception.comment]
1.6 misha 63: }
64:
65:
1.20 moko 66: @try-catch-comment[jCode]
67: ^try{$jCode}{
68: $exception.handled(true)
69: Exception: ^taint[as-is;$exception.comment]
70: }
71:
72:
1.5 misha 73: @1251[]
74: ^from-1251[]
75: ^to-1251[]
76:
77:
78: @from-1251[]
1.4 misha 79: $request:charset[windows-1251]
1.5 misha 80:
81:
82: @to-1251[]
1.4 misha 83: $response:charset[windows-1251]
1.5 misha 84:
85:
86: # backward
87: @windows-1251[]
88: ^1251[]
1.11 moko 89:
1.12 moko 90: @os[win;unix][name]
91: $name[^env:OS.left(7)]
92: $result[^if(^name.lower[] eq 'windows'){$win}{$unix}]
E-mail: