diff --git a/src/sudoku.s b/src/sudoku.s
index 3b1c8b3..e7ce80e 100644
--- a/src/sudoku.s
+++ b/src/sudoku.s
@@ -138,7 +138,7 @@ IMPRTF: PUSH  P,A                      ;Save the A register.
         MOVE  X,[440400,,FIELD]        ;Init a 4-bit byte pointer to FIELD.
         .CALL [SETZ ? SIXBIT/OPEN/     ;Open a file descriptor.
             [.UAI,,CHDSKI] ? [SIXBIT/DSK/] ;Mode, channel and device name
-                [A] ? [B] ((SETZ))]
+                A ? B ((SETZ))]
          .LOSE %LSFIL                  ;Handle errors after opening the file
 IMPRD:  .IOT  CHDSKI,A                 ;Read an ascii char into A.
         JUMPL A,IMPREX                 ;If there was nothing read, exit.