From d69c382c3637b476607b4ea7ec6913e407384e81 Mon Sep 17 00:00:00 2001 From: Jeremiah Orians Date: Sun, 30 Oct 2016 20:29:14 -0400 Subject: [PATCH] Fixing minor mistakes --- stage2/forth.s | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/stage2/forth.s b/stage2/forth.s index 080e19a..b9a4f70 100644 --- a/stage2/forth.s +++ b/stage2/forth.s @@ -1111,6 +1111,7 @@ &SEMICOLON_Entry ; Pointer to Semicolon &Branch_Text ; Pointer to Name NOP ; Flags + &Branch_Code ; Where assembly is Stored :Branch_Code LOAD R0 R13 0 ; Get Contents of NEXT ADD R13 R13 R0 ; Update NEXT with offset @@ -1203,7 +1204,6 @@ &Interpret_Entry ; Pointer to INTERPRET &CR_Text ; Pointer to Name NOP ; Flags - &CR_Code ; Where assembly is Stored :CR_Code &DOCOL ; Use DOCOL &LIT_Code ; Read next word