X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fcontrol%2Frepeat.c;h=951c0094eb252d287e7a08e78531c1dc76ad3891;hb=136d243060f851e01ef46e72b9b554059b5ae544;hp=796c6e9354702bd5815cd83093a8793b4cc07ac6;hpb=a86909a07716f0d1d2452acb6558e7bd190d0f4a;p=pspp-builds.git

diff --git a/src/language/control/repeat.c b/src/language/control/repeat.c
index 796c6e93..951c0094 100644
--- a/src/language/control/repeat.c
+++ b/src/language/control/repeat.c
@@ -549,6 +549,8 @@ do_repeat_read  (struct getl_interface *b, struct string *output)
       if (block->loop_idx >= block->loop_cnt)
         return false;
       block->cur_line = block->first_line;
+      if (block->cur_line == NULL)
+        return false;
     }
   line = block->cur_line;