|
|
1.1 moko 1: @main[]
2:
3: ^for[]
4:
5: ^reflection:override[$B:test; $.name[gm] ]
6: 1. ^gm[]
7: 1. ^MAIN:gm[]
8:
9: $a[^A::create[]]
10: 3. static: ^A:test[]
11: 4. dynamic: ^a.test[]
12:
13: ^reflection:override[$B:test; $.to[$A:CLASS] ]
14:
15: $a[^A::create[]]
16: 5. static: ^A:test[]
17: 6. dynamic: ^a.test[]
18:
19: 7. extra static: ^A:extra[]
20: 8. extra dynamic: ^a.extra[]
21:
1.2 ! moko 22: 9. exceptions:
! 23: ^try-catch{ ^reflection:override[$nothing; $.to[$a] ] }
! 24: ^try-catch{ ^reflection:override[$table:append; $.to[$a] ] }
! 25: ^try-catch{ ^reflection:override[$B:test; $.to[$void] ] }
! 26:
! 27:
1.1 moko 28: @for[]
29: my for
30:
31: @gm[]
32: before
33:
34:
35: @CLASS
36: B
37:
38: @create[]
39:
40: @test[]
41: new test for "$self.CLASS_NAME" from "$caller.CLASS_NAME"
42:
43: @CLASS
44: A
45:
46: @create[]
47:
48: @test[]
49: test for "$self.CLASS_NAME"
50:
51: @extra[]
52: extra ^test[]