X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fdata-io%2Fdata-list.c;h=75db52af6548f61baa214f9250856778565fb53b;hb=2c7d1b0285e21571b1e50def87e33095f095ce4e;hp=4e2f083bee9077f2f69c990624fc6694b8ed0749;hpb=24d4c143974d0cf3258fe2d355695e820c4ff24e;p=pspp

diff --git a/src/language/data-io/data-list.c b/src/language/data-io/data-list.c
index 4e2f083bee..75db52af65 100644
--- a/src/language/data-io/data-list.c
+++ b/src/language/data-io/data-list.c
@@ -249,6 +249,12 @@ cmd_data_list (struct lexer *lexer, struct dataset *ds)
   if (dls->type == -1)
     dls->type = DLS_FIXED;
 
+  if (dls->type != DLS_FIXED && dls->end != NULL)
+    {
+      msg (SE, _("The END keyword may be used only with DATA LIST FIXED."));
+      goto error;
+    }
+
   if (table == -1)
     table = dls->type != DLS_FREE;