X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fmath%2Finteraction.c;h=05a8bf46bd4ade424cef3d9bec85fde043205ea5;hb=72f4ef01cee853fd8e5bca96afad06397326ec76;hp=33da8423bd7c7545a69e4c51a1d0a9a5abd4318d;hpb=d75247c28e0dce9c21070e4ee14fdc6a2338fb77;p=pspp-builds.git

diff --git a/src/math/interaction.c b/src/math/interaction.c
index 33da8423..05a8bf46 100644
--- a/src/math/interaction.c
+++ b/src/math/interaction.c
@@ -73,7 +73,6 @@ interaction_variable_create (const struct variable **vars, int n_vars)
       result = xmalloc (sizeof (*result));
       result->n_alpha = 0;
       result->members = xnmalloc (n_vars, sizeof (*result->members));
-      result->intr = var_create_internal (0);
       result->n_vars = n_vars;
       for (i = 0; i < n_vars; i++)
 	{
@@ -84,10 +83,7 @@ interaction_variable_create (const struct variable **vars, int n_vars)
 	    }
 	}
     }
-  /*
-    VAR_SET_WIDTH sets the type of the variable.
-   */
-  var_set_width (result->intr, MAX_SHORT_STRING * result->n_alpha + 1);
+  result->intr = var_create_internal (0);
 
   return result;
 }