1 files changed, 6 insertions, 0 deletions

diff --git a/jefs.s b/jefs.s
index 03dd963..da26f5e 100644
--- a/jefs.s
+++ b/jefs.s
@@ -700,13 +700,17 @@ defword "-rot", dash_rot, 0
 	ret
 
 defword "r>", from_r, 0
+	pop r12 ; keep return address
 	pop r11
 	pspush r11
+	push r12
 	ret
 
 defword ">r", to_r, 0
+	pop r12 ; ret addr
 	pspop r11
 	push r11
+	push r12
 	ret
 
 defword "drop", drop, 0
@@ -719,7 +723,9 @@ defword "2drop", twodrop, 0
 	ret
 
 defword "rdrop", rdrop, 0
+	pop r12 ; ret addr
 	pop r11
+	push r12
 	ret
 
 ; not sure if this is the right place to put this but