diff --git a/BF-RUN.COB b/BF-RUN.COB
index d53e246..e09a4ce 100644
--- a/BF-RUN.COB
+++ b/BF-RUN.COB
@@ -192,7 +192,7 @@
                        ADD 1 TO LOOP-WORK.
 
        UNREAD-INSTRUCTION.
-           IF IP IS GREATER THAN 1 THEN
+           IF IP IS GREATER THAN 3 THEN
                SUBTRACT 2 FROM IP
                UNSTRING BF-CODE INTO CURRENT-INSTRUCTION WITH POINTER IP
            ELSE