X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=impl.asm;h=67d11b57ac02a3b7378c6f87d6b0276d39c91b19;hb=4a9ccd4fd3b9b19c696a2f37e0b46eecc1fdd671;hp=e8cd883b2eb8c9c845e187ca98c041568f1e83e2;hpb=4170f15b09ccd8bcafc00bb960a6e56670252256;p=rrq%2Fjonasforth.git diff --git a/impl.asm b/impl.asm index e8cd883..67d11b5 100644 --- a/impl.asm +++ b/impl.asm @@ -1,6 +1,4 @@ -;; vim: syntax=fasm - -section '.text' code readable executable +os_code_section macro printlen msg, len { push rsi @@ -8,7 +6,7 @@ macro printlen msg, len { mov rcx, msg mov rdx, len - sys_print_string + call os_print_string sub rsp, 8 pop rsi @@ -183,9 +181,10 @@ parse_number: pop rdi printlen rdi, [.length] newline - sys_terminate 100 + mov rax, 100 + call os_terminate -section '.data' readable writable +os_data_section find.search_length dq ? find.search_buffer dq ?