X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fsel-if.c;h=c703e2f460fcc898140bffc37448a35661d76f54;hb=3fb611d221aa070458c81c6ca8b1c78fbad9a0ab;hp=8d224d0215d793e03d2966d5319efece3eb2c208;hpb=b321086267ad1014dc5d09886396cde30f094437;p=pspp diff --git a/src/sel-if.c b/src/sel-if.c index 8d224d0215..c703e2f460 100644 --- a/src/sel-if.c +++ b/src/sel-if.c @@ -14,19 +14,22 @@ You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software - Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA - 02111-1307, USA. */ + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA + 02110-1301, USA. */ #include #include "alloc.h" #include "command.h" #include "dictionary.h" #include "error.h" -#include "expr.h" +#include "expressions/public.h" #include "lexer.h" #include "str.h" #include "var.h" +#include "gettext.h" +#define _(msgid) gettext (msgid) + /* SELECT IF transformation. */ struct select_if_trns { @@ -44,7 +47,7 @@ cmd_select_if (void) struct expression *e; struct select_if_trns *t; - e = expr_parse (EXPR_BOOLEAN); + e = expr_parse (default_dict, EXPR_BOOLEAN); if (!e) return CMD_FAILURE; @@ -66,11 +69,11 @@ cmd_select_if (void) /* Performs the SELECT IF transformation T on case C. */ static int -select_if_proc (struct trns_header * t, struct ccase * c, +select_if_proc (struct trns_header *t_, struct ccase *c, int case_num) { - return (expr_evaluate (((struct select_if_trns *) t)->e, c, - case_num, NULL) == 1.0) - 2; + struct select_if_trns *t = (struct select_if_trns *) t_; + return expr_evaluate_num (t->e, c, case_num) == 1.0 ? -1 : -2; } /* Frees SELECT IF transformation T. */ @@ -121,7 +124,7 @@ cmd_process_if (void) { struct expression *e; - e = expr_parse (EXPR_BOOLEAN); + e = expr_parse (default_dict, EXPR_BOOLEAN); if (!e) return CMD_FAILURE;