diff --git a/femto.tal b/femto.tal index f8063b6..38a6abc 100644 --- a/femto.tal +++ b/femto.tal @@ -289,7 +289,6 @@ @last-pos ;buffer/limit LDA2 #0001 SUB2 JMP2r -( @doc-start ( -> s* ) ;buffer/data JMP2r @doc-limit ( -> s* ) ;buffer/limit LDA2 JMP2r @doc-last ( -> s* ) ;buffer/limit LDA2 #0001 SUB2 JMP2r @@ -301,7 +300,6 @@ @line-start ( -> s* ) ;cursor/row LDA ;rel-line JSR2 JMP2r @line-limit ( -> s* ) ;cursor/row LDA INC ;rel-line JSR2 JMP2r @line-last ( -> s* ) ;cursor/row LDA INC ;rel-line JSR2 #0001 SUB2 JMP2r -) @mod-div ( x^ y^ -> x%d x/y ) DIVk ( x y x/y ) STHk ( x y x/y [x/y] ) MUL ( x y*x/y [x/y] )