X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fexpr-evl.c;h=62a9f6b2eae6b9768c6d990111f829fb7ff40932;hb=2ca4a5735ccbbe66ae2277faf6aa47e2bb83bfab;hp=a1b540e4974d984f78036eb8305be6ed285c5682;hpb=60d7d619ee7885ad065f178eb0cf1e5d432b1921;p=pspp

diff --git a/src/expr-evl.c b/src/expr-evl.c
index a1b540e497..62a9f6b2ea 100644
--- a/src/expr-evl.c
+++ b/src/expr-evl.c
@@ -51,7 +51,8 @@
 #include "vfmP.h"
 
 double
-expr_evaluate (struct expression *e, struct ccase *c, union value *v)
+expr_evaluate (struct expression *e, const struct ccase *c, int case_num,
+               union value *v)
 {
   unsigned char *op = e->op;
   double *dbl = e->num;
@@ -1275,7 +1276,7 @@ expr_evaluate (struct expression *e, struct ccase *c, union value *v)
 	  break;
 	case OP_CASENUM:
 	  sp++;
-	  sp->f = vfm_sink_info.ncases + 1;
+	  sp->f = case_num;
 	  break;
 
 	case OP_SENTINEL: