Fix rest of PR 13054.

[pspp-builds.git] / src / data-list.c

diff --git a/src/data-list.c b/src/data-list.c
index a6a68dc687942f5964afada2b132a3dd42d94c15..66fab631ea23032a0e52d87d4724869236475edb 100644 (file)
--- a/src/data-list.c
+++ b/src/data-list.c
@@ -848,10 +848,8 @@ parse_free (struct dls_var_spec **first, struct dls_var_spec **last)
       else
        {
          lex_match ('*');
-         input.type = FMT_F;
-         input.w = 8;
-         input.d = 0;
-         output = get_format();
+          input = make_input_format (FMT_F, 8, 0);
+         output = get_format ();
        }
 
       if (input.type == FMT_A || input.type == FMT_AHEX)