7 lines
102 B
Forth
7 lines
102 B
Forth
|
: f1 Exception throw("An exception") ;
|
||
|
|
Integer method: f2 self f1 ;
|
||
|
|
: f3 f2 ;
|
||
|
|
: f4 f3 ;
|
||
|
|
|
||
|
|
10 f4
|