2 lines
68 B
Forth
2 lines
68 B
Forth
: X(me, f) #[ me f me perform f perform ] ;
|
|
: Y(f) #X f X ;
|
: X(me, f) #[ me f me perform f perform ] ;
|
|
: Y(f) #X f X ;
|