X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fxforms%2Fselect-if.c;h=f5b55ff9be7f7ed46c59382f9fd6971198ef6fb7;hb=38006c9843177b65a2ce9bee47c1a8eeb6243973;hp=4666f52db9f1964a32df42a524e249089319dbc8;hpb=f82dc2b98914813be2084fffb0cea33b48c2e438;p=pspp-builds.git

diff --git a/src/language/xforms/select-if.c b/src/language/xforms/select-if.c
index 4666f52d..f5b55ff9 100644
--- a/src/language/xforms/select-if.c
+++ b/src/language/xforms/select-if.c
@@ -121,33 +121,3 @@ cmd_filter (void)
 
   return CMD_SUCCESS;
 }
-
-/* Expression on PROCESS IF. */
-struct expression *process_if_expr;
-
-/* Parses the PROCESS IF command. */
-int
-cmd_process_if (void)
-{
-  struct expression *e;
-
-  e = expr_parse (default_dict, EXPR_BOOLEAN);
-  if (!e)
-    return CMD_FAILURE;
-
-  if (token != '.')
-    {
-      expr_free (e);
-      lex_error (_("expecting end of command"));
-      return CMD_FAILURE;
-    }
-
-  if (process_if_expr)
-    {
-      msg (SW, _("Only last instance of this command is in effect."));
-      expr_free (process_if_expr);
-    }
-  process_if_expr = e;
-
-  return CMD_SUCCESS;
-}