diff --git a/PLASMA-BLD1.PO b/PLASMA-BLD1.PO
index 6cf7ea6..ed98e66 100644
Binary files a/PLASMA-BLD1.PO and b/PLASMA-BLD1.PO differ
diff --git a/src/toolsrc/codeopt.pla b/src/toolsrc/codeopt.pla
index 234ce8a..d695d5b 100644
--- a/src/toolsrc/codeopt.pla
+++ b/src/toolsrc/codeopt.pla
@@ -133,7 +133,7 @@ def crunch_seq(seq, pass)
                         fin
                         break
                     is CONST_CODE // Collapse constant operation
-                        nextopnext = nextop->opnext
+                        nextopnext = nextop=>opnext
                         if nextopnext
                             when nextopnext->opcode
                                 is MUL_CODE