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

diff --git a/src/repeat.c b/src/repeat.c
index aef5e9842d..09809fde1e 100644
--- a/src/repeat.c
+++ b/src/repeat.c
@@ -18,6 +18,7 @@
    02111-1307, USA. */
 
 #include <config.h>
+#include "repeat.h"
 #include <assert.h>
 #include <ctype.h>
 #include <math.h>
@@ -328,9 +329,9 @@ internal_cmd_do_repeat (void)
 	    {
 	      /* Note that if the variable already exists there is no
 		 harm done. */
-	      struct variable *v = create_variable (&default_dict,
+	      struct variable *v = dict_create_var (default_dict,
 						    iter->replacement[i],
-						    NUMERIC, 0);
+						    0);
 
 	      /* If we created the variable then we need to initialize
 		 its observations to SYSMIS. */
@@ -513,7 +514,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;