Skip to content

Modify words/all.asm to allow more local forth words #213

Description

@bjchapm
diff --git a/words/all.asm b/words/all.asm
index 07306f0..020837f 100644
--- a/words/all.asm
+++ b/words/all.asm
@@ -72,8 +72,11 @@ _load_user_vars_loop:
                 ; followed by any user-defined words from user_words.asc.
                 ; These are stored sequentially in ROM so we can evaluate them together.
                 ; If you have neither, this section can be commented out.
-                jsr push_inline_addru_literal
-                .byte user_words_end-user_words_start  ; length goes TOS
+                ; jsr push_inline_addru_literal
+                ; .byte user_words_end-user_words_start  ; length goes TOS
+;               BJC proposed change 
+                jsr push_inline_2literal
+                .word user_words_end-user_words_start  ; length goes TOS
                 .word user_words_start                 ; start address goes NOS
                 jsr w_evaluate

The original code only allows 256 bytes of user defined words if I understand correctly. Is this a reasonable change?

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions