diff options
Diffstat (limited to 'jefs.s')
| -rw-r--r-- | jefs.s | 73 |
1 files changed, 37 insertions, 36 deletions
@@ -1002,42 +1002,42 @@ defword "0branch", zerobranch, 0 ; debugging word; outputs raw bytes so needs to be piped through `x(x)d` ; terrible and awful ; W = r14; W <= wstack_b; W+=8 -defword ".s", dots, 0 - push r11 - push r12 - - mov r12, r14 -.loop: - cmp r12, wstack - jge .done - - mov [.space], r12 - mov rdx, 8 ; qword - mov rsi, .space - mov rdi, 1 - mov rax, __NR_write - syscall - - mov rdx, 8 ; qword - mov rsi, r12 - mov rdi, 1 - mov rax, __NR_write - syscall - lea r12, [r12+8] - jmp .loop - -.done: - mov rdx, 16 ; 2 qword - mov rsi, .dmsg - mov rdi, 1 - mov rax, __NR_write - syscall - - pop r12 - pop r11 - ret -.space: resq 1 -.dmsg: db "DONEDONEYIPPEEEE" +; defword ".s", dots, 0 +; push r11 +; push r12 +; +; mov r12, r14 +; .loop: +; cmp r12, wstack +; jge .done +; +; mov [.space], r12 +; mov rdx, 8 ; qword +; mov rsi, .space +; mov rdi, 1 +; mov rax, __NR_write +; syscall +; +; mov rdx, 8 ; qword +; mov rsi, r12 +; mov rdi, 1 +; mov rax, __NR_write +; syscall +; lea r12, [r12+8] +; jmp .loop +; +; .done: +; mov rdx, 16 ; 2 qword +; mov rsi, .dmsg +; mov rdi, 1 +; mov rax, __NR_write +; syscall +; +; pop r12 +; pop r11 +; ret +; .space: resq 1 +; .dmsg: db "DONEDONEYIPPEEEE" defword "HEREDUMP", heredump, 0 mov rdx, [here] @@ -1055,6 +1055,7 @@ defvar "#tib", num_tib, 0, initlen defvar ">in", to_in, 0, 0 defvar "state", state, 0, interpreting defvar "here", here, 0, umem +defvar "s0", s0, 0, wstack - 8 defvar "h0", h0, 0, umem ; beginning of user memory area defvar "hend", hend, 0, umem_e ; ending of user memory area defvar "base", base, 0, 10 |