Subcommand to export a model as a C function

[pspp] / src / sysfile-info.c

diff --git a/src/sysfile-info.c b/src/sysfile-info.c
index fe26a7c0335bf1a2f4b98cb71fcc99e66475bb35..b5f559e5185527a9f68f8397d535db93cf56cb56 100644 (file)
--- a/src/sysfile-info.c
+++ b/src/sysfile-info.c
@@ -576,7 +576,7 @@ display_vectors (int sorted)
       return;
     }
 
-  vl = xmalloc (sizeof *vl * nvec);
+  vl = xnmalloc (nvec, sizeof *vl);
   for (i = 0; i < nvec; i++)
     vl[i] = dict_get_vector (default_dict, i);
   if (sorted)