Annotation of parser3/tests/421.html, revision 1.3
1.1 moko 1: @main[]
2: $list[^reflection:classes[]]
3: ^list.sort[name;]{$name}
4:
5: 1. nonexistent method exception check for all classes
6: ^list.foreach[name;type]{
7: $class[^reflection:class_by_name[$name]]
8: Class $name $type ^if(def ^reflection:base_name[$class]){(^reflection:base_name[$class])}
9: $code[^^$name^:bad[]]
10: $code ^try-catch{^process{$code}}
11: ^try-catch{^class.bad[]}
12: }
13:
14: 2. nonexistent field exception check for all classes
15: ^list.foreach[name;type]{
16: $class[^reflection:class_by_name[$name]]
17: Class $name
18: $code[^$$name^:bad]
19: $code ^try-catch{^process{$code}
20: no exception}
21: ^try-catch{^process{^$$name^:bad}
22: no exception}
23: }
24:
25: 3. nonexistent method and field exception check for all objects
26:
27: $s[1]
28: $doc[^xdoc::create{^xml[]}]
29: ^check(true)
30: ^check[s]
31: ^check(1)
32: ^check(^s.int[])
33: ^check[^date::now[]]
34: ^check[^file::create[name]]
35: ^check[^hash::create[]]
36: ^check[^image::create(100;100)]
37: ^check[^regex::create[.]]
38: ^check[^table::create{field}]
39: ^check[$void]
40: ^check[^obj::create[]]
41: ^check[$doc]
42: ^check[$doc.documentElement]
1.3 ! moko 43: ^check[^array::create[]]
1.1 moko 44:
45: @xml[]
46: <?xml version="1.0"?>
47: <document>content</document>
48:
49: @check[v]
50:
51: #$v.CLASS_NAME method ^try-catch{ ^v.bad[] }
52: $v.CLASS_NAME
53: method ^try-catch{ ^v.bad[] } field ^try-catch{ $v.bad
54: no exception}
55:
56: @CLASS
57: obj
58:
59: @create[]
E-mail: