From 3fa957dceb516bda30e6ea3ad16538460c0653dd Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Madeleine=20Sydney=20=C5=9Alaga?= <msyds@deertopia.net>
Date: Sun, 21 Jun 2026 20:00:19 -0600
Subject: [PATCH] make opcodes case insensitive

---
 5.1/assembler.lua | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/5.1/assembler.lua b/5.1/assembler.lua
index fb89b18..e5f0b27 100644
--- a/5.1/assembler.lua
+++ b/5.1/assembler.lua
@@ -100,7 +100,7 @@ grammar = [[
   label <- <name> ":"
   string <- '"' ('\\' / '\"' / !'"' .)* '"'
   instruction <- ( <s> ( {<label>} / <number>)? <s> <ln>? <s> {<op>} ( <s> {<param>} )+ <s> ( %nl )+ ) -> {}
-  op <- [A-Z]+
+  op <- [A-Za-z]+
   param <- <register> / <number> / <name> / <string>
   register <- ( "R[" <number> "]" )
   s <- ( !%nl %s )*
@@ -310,10 +310,10 @@ function parse_inst(table, parsed, n)
   local b = 3
   local c = 4
   if check_label(table[1]) == nil then
-    op = table[1]
+    op = string.upper (table[1])
   else
     set_label(table[1], parsed, n)
-    op = table[2]
+    op = string.upper (table[2])
     a = 3
     b = 4
     c = 5