reverse order in interpreter

i could maybe test this at some point, but maybe it's a little more
efficient. who knows

1 files changed, 8 insertions, 6 deletions

diff --git a/jefs.s b/jefs.s
index c34dc7d..8af3ab7 100644
--- a/jefs.s
+++ b/jefs.s
@@ -212,20 +212,22 @@ defword "interpret", interpret, 0
 	pspop r11 ; assume it exists its fine for now
 	call to_cfa
 	mov r12, qword [state]
-	cmp r12, interpreting
-	je .interp
+	cmp r12, compiling
+	je .compile
 
-.compile:
+.interp:
 	pspop r11
-	call compile_comma,
+	call r11
+	jmp .loop
 	ret ; unreachable safety RET
 
-.interp:
+.compile:
 	pspop r11
-	call r11
+	call compile_comma
 	jmp .loop
 	ret ; unreachable safety RET
 
+
 defword ">cfa", to_cfa, 0
 	pspop r11
 	add r11, 9