Note that gperf is now required.
[pspp] / src / language / expressions / optimize.c
index 154517927dee47bdecaa68fe93d4af926dd0227f..0425a7adb796f99fe96fefb310c6456ed19e131a 100644 (file)
@@ -1,6 +1,5 @@
 /* PSPP - computes sample statistics.
    Copyright (C) 1997-9, 2000 Free Software Foundation, Inc.
-   Written by Ben Pfaff <blp@gnu.org>.
 
    This program is free software; you can redistribute it and/or
    modify it under the terms of the GNU General Public License as
@@ -45,7 +44,7 @@ expr_optimize (union any_node *node, struct expression *e)
 {
   int nonconst_cnt = 0; /* Number of nonconstant children. */
   int sysmis_cnt = 0;   /* Number of system-missing children. */
-  struct operation *op;
+  const struct operation *op;
   struct composite_node *c;
   int i;
 
@@ -248,7 +247,7 @@ emit_format (struct expression *e, const struct fmt_spec *f)
 }
 
 static void
-emit_variable (struct expression *e, struct variable *v) 
+emit_variable (struct expression *e, const struct variable *v) 
 {
   allocate_aux (e, OP_variable)->variable = v;
 }
@@ -308,7 +307,7 @@ flatten_atom (union any_node *n, struct expression *e)
 static void
 flatten_composite (union any_node *n, struct expression *e)
 {
-  struct operation *op = &operations[n->type];
+  const struct operation *op = &operations[n->type];
   size_t i;
       
   for (i = 0; i < n->composite.arg_cnt; i++)