Fixed crash from FLIP when a numeric variable is specified on NEWNAMES

[pspp] / src / print.c

diff --git a/src/print.c b/src/print.c
index 70a41763c4a5d7b52e4d3d5fec9adc6a5f43364c..e1f7f6eff67ba7b67f3a0bd444c07e69f3f29626 100644 (file)
--- a/src/print.c
+++ b/src/print.c
@@ -17,24 +17,7 @@
    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
    02111-1307, USA. */
 
-/* AIX requires this to be the first thing in the file.  */
 #include <config.h>
-#if __GNUC__
-#define alloca __builtin_alloca
-#else
-#if HAVE_ALLOCA_H
-#include <alloca.h>
-#else
-#ifdef _AIX
-#pragma alloca
-#else
-#ifndef alloca                 /* predefined by HP cc +Olibcalls */
-char *alloca ();
-#endif
-#endif
-#endif
-#endif
-
 #include <assert.h>
 #include <stdlib.h>
 #include "alloc.h"
@@ -49,8 +32,6 @@ char *alloca ();
 #include "tab.h"
 #include "var.h"
 
-#undef DEBUGGING
-/*#define DEBUGGING 1*/
 #include "debug-print.h"
 
 /* Describes what to do when an output field is encountered. */
@@ -228,7 +209,7 @@ internal_cmd_print (int f)
   memcpy (trns, &prt, sizeof *trns);
   add_transformation ((struct trns_header *) trns);
 
-#if DEBUGGING
+#if 0 && DEBUGGING
   debug_print ();
 #endif
 
@@ -455,7 +436,7 @@ fail:
 static int
 parse_variable_argument (void)
 {
-  if (!parse_variables (NULL, &fx.v, &fx.nv, PV_DUPLICATE))
+  if (!parse_variables (default_dict, &fx.v, &fx.nv, PV_DUPLICATE))
     return 0;
 
   if (token == T_NUM)
@@ -1170,7 +1151,7 @@ print_space_trns_free (struct trns_header * trns)
 \f
 /* Debugging code. */
 
-#if DEBUGGING
+#if 0 && DEBUGGING
 void
 debug_print (void)
 {