compile: encoder test: t constant: c block: inBlock | save ssave |
encoder genHigh: 15 low: t. " branch test "
save <- encoder genCode: 0.
(arguments at: 1) compileInLine: encoder block: inBlock.
encoder genHigh: 15 low: 6. " branch "
ssave <- encoder genCode: 0.
encoder patch: save.
encoder genHigh: 5 low: c. " push constant "
encoder patch: ssave