X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Frepeat.c;h=bf89fedecd50f0b5e131ed3c2141d814e59fa5f1;hb=1f8a2f2be1bdfcbc0c85319da83c46d2e142e32b;hp=aef5e9842db1679c8ecee195e0ce9ccc85b67b4c;hpb=fcb9e49b2a2d57af7c001ae5d2eda9ac443ba36b;p=pspp

diff --git a/src/repeat.c b/src/repeat.c
index aef5e9842d..bf89fedecd 100644
--- a/src/repeat.c
+++ b/src/repeat.c
@@ -18,12 +18,12 @@
    02111-1307, USA. */
 
 #include <config.h>
+#include "repeat.h"
 #include <assert.h>
 #include <ctype.h>
 #include <math.h>
 #include <stdlib.h>
 #include "alloc.h"
-#include "cases.h"
 #include "command.h"
 #include "error.h"
 #include "getline.h"
@@ -328,14 +328,7 @@ internal_cmd_do_repeat (void)
 	    {
 	      /* Note that if the variable already exists there is no
 		 harm done. */
-	      struct variable *v = create_variable (&default_dict,
-						    iter->replacement[i],
-						    NUMERIC, 0);
-
-	      /* If we created the variable then we need to initialize
-		 its observations to SYSMIS. */
-	      if (v)
-		envector (v);
+	      dict_create_var (default_dict, iter->replacement[i], 0);
 	    }
 	}
   }
@@ -513,7 +506,7 @@ cmd_end_repeat (void)
 
 /* Finds a DO REPEAT macro with name MACRO_NAME and returns the
    appropriate subsitution if found, or NULL if not. */
-char *
+static char *
 find_DO_REPEAT_substitution (char *macro_name)
 {
   struct getl_script *s;