From 30bdd44ba51caaaf3423aed9e75e21cb095d0cb0 Mon Sep 17 00:00:00 2001 From: able Date: Fri, 3 May 2024 13:48:10 -0500 Subject: [PATCH] minor changes --- lasp.S | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/lasp.S b/lasp.S index eb18506..a8195d5 100644 --- a/lasp.S +++ b/lasp.S @@ -5,7 +5,7 @@ li64 r13, 0 ;; r253 will be the offset from the stack pointer specified by the spec to be r254 li64 r253, 0 - +; Load first char ldr r12, r13, lisp, 1 loop: @@ -27,6 +27,7 @@ loop: ; push the char onto the stack jmp push_u64_stack + ; loop :skull: jmp loop tx @@ -63,10 +64,6 @@ closed_paren: jmp log_lisp_error eval_stack: - jmp pop_u64_stack - jmp panic - -panic: jmp log_lisp_error lisp: