@main[]

^for[]

^reflection:override[$B:test; $.name[gm] ]
1. ^gm[]
1. ^MAIN:gm[]

$a[^A::create[]]
3. static: ^A:test[]
4. dynamic: ^a.test[]

^reflection:override[$B:test; $.to[$A:CLASS] ]

$a[^A::create[]]
5. static: ^A:test[]
6. dynamic: ^a.test[]

7. extra static: ^A:extra[]
8. extra dynamic: ^a.extra[]

9. exceptions:
  ^try-catch{ ^reflection:override[$nothing; $.to[$a] ] }
  ^try-catch{ ^reflection:override[$table:append; $.to[$a] ] }
  ^try-catch{ ^reflection:override[$B:test; $.to[$void] ] }


@for[]
my for

@gm[]
before


@CLASS
B

@create[]

@test[]
new test for "$self.CLASS_NAME" from "$caller.CLASS_NAME"

@CLASS
A

@create[]

@test[]
test for "$self.CLASS_NAME"

@extra[]
extra ^test[]