From: Ben Pfaff <blp@gnu.org>
Date: Sat, 21 Feb 2004 07:23:59 +0000 (+0000)
Subject: Fix root cause of bug worked around by previous check-in, and remove
X-Git-Tag: v0.4.0~341
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=f85548f27a1958bb6c84a6917b874c537f4c0bd6;p=pspp-builds.git

Fix root cause of bug worked around by previous check-in, and remove
workaround.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 2c524f32..704fce07 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,11 @@
+Fri Feb 20 23:22:14 2004  Ben Pfaff  <blp@gnu.org>
+
+	* dictionary.c: (dict_create_var) Fix root cause of bug worked
+	around by previous change log entry.
+	
+	* compute.c: (lvalue_finalize) Remove workaround from previous
+	change log entry.
+
 Fri Feb 20 14:37:41 WAST 2004 John Darrington <john@darrington.wattle.id.au>
 
 	* compute.c: Fixed a bug where the Format was not getting set for 
diff --git a/src/compute.c b/src/compute.c
index d26bf1ed..aed44385 100644
--- a/src/compute.c
+++ b/src/compute.c
@@ -397,15 +397,9 @@ lvalue_finalize (struct lvalue *lvalue,
     {
       compute->variable = dict_lookup_var (default_dict, lvalue->var_name);
       if (compute->variable == NULL)
-	{
-	  struct fmt_spec input_spec = { 0,8,2 };
 	  compute->variable = dict_create_var_assert (default_dict,
 						      lvalue->var_name, 0);
 
-       	  convert_fmt_ItoO (&input_spec, &compute->variable->print);
-	  compute->variable->write = compute->variable->print;
-	}
-
       compute->fv = compute->variable->fv;
       compute->width = compute->variable->width;
 
diff --git a/src/dictionary.c b/src/dictionary.c
index 0f7133ec..9b69c898 100644
--- a/src/dictionary.c
+++ b/src/dictionary.c
@@ -250,6 +250,7 @@ dict_create_var (struct dictionary *d, const char *name, int width)
       v->print.w = v->width;
       v->print.d = 0;
     }
+  v->write = v->print;
   v->val_labs = val_labs_create (v->width);
   v->label = NULL;