diff --git a/src/sudoku.s b/src/sudoku.s
index edba133..dc3ec56 100644
--- a/src/sudoku.s
+++ b/src/sudoku.s
@@ -52,6 +52,7 @@ GETJCL: PUSH  P,A                      ;Save the register A.
         MOVE  A,[JCL,,JCL+30]
         BLT   A,JCL+30
         .BREAK 12,[..RJCL,,JCL]        ;Request the JCL.
+        MOVE  A,[JCL]
         MOVE  A,[BPTR,,JCL]            ;Load the command parameters into A.
         MOVE  B,[BPTR,,FNAME1]         ;Pointer to the first file name.
         ;PUSHJ P,TOSIXB                 ;Transfer the first word into FNAME1
@@ -60,7 +61,7 @@ GETJCL: PUSH  P,A                      ;Save the register A.
         POP   P,B                      ;Restore the B register.
         POP   P,A                      ;Restore the A register.
         POPJ  P,                       ;Return from routine.
-        
+
 ;Subroutine to convert an ASCII string into SIXBIT. Takes a byte
 ;pointer in A and B, where A is the source and B is the destination.
 TOSIXB: PUSH  P,D                     ;Store the contents of register D.