X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdo-if.c;h=339710696326035de2bf4ec760a9b05dedfe246f;hb=1f8a2f2be1bdfcbc0c85319da83c46d2e142e32b;hp=247684ec296a71dd33b0d4142eb562a4978267c0;hpb=3a7fba81ceae5b049d0f7d671e9e3c3c43bbf703;p=pspp diff --git a/src/do-if.c b/src/do-if.c index 247684ec29..3397106963 100644 --- a/src/do-if.c +++ b/src/do-if.c @@ -76,9 +76,8 @@ static struct do_if_trns *parse_do_if (void); static void add_ELSE_IF (struct do_if_trns *); -static int goto_trns_proc (struct trns_header *, struct ccase *); -static int do_if_trns_proc (struct trns_header *, struct ccase *); -static void do_if_trns_free (struct trns_header *); +static trns_proc_func goto_trns_proc, do_if_trns_proc; +static trns_free_func do_if_trns_free; /* Parse DO IF. */ int @@ -276,18 +275,20 @@ parse_do_if (void) /* Executes a goto transformation. */ static int -goto_trns_proc (struct trns_header * t, struct ccase * c unused) +goto_trns_proc (struct trns_header * t, struct ccase * c UNUSED, + int case_num UNUSED) { return ((struct goto_trns *) t)->dest; } static int -do_if_trns_proc (struct trns_header * trns, struct ccase * c) +do_if_trns_proc (struct trns_header * trns, struct ccase * c, + int case_num UNUSED) { struct do_if_trns *t = (struct do_if_trns *) trns; union value bool; - expr_evaluate (t->cond, c, &bool); + expr_evaluate (t->cond, c, case_num, &bool); if (bool.f == 1.0) { debug_printf ((_("DO IF %d: true\n"), t->h.index));