|
- : JPccnn, SWAP <<3 0xc2 OR A, A,, ;
- : BCALL, BIN( @ + CALLnn, ;
- : BJP, BIN( @ + JPnn, ;
- : BJPcc, BIN( @ + JPccnn, ;
-
- : JPNEXT, 26 BJP, ; ( 26 == next )
-
- : chkPS, 29 BCALL, ; ( 29 == chkPS )
-
- : CODE ( same as CREATE, but with native word )
- (entry)
- 23 C, ( 23 == nativeWord )
- ;
- : ;CODE JPNEXT, ;
|