X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Foperations.def;h=dbd5ce2b2e688a3ea8269acbd8de8fd4d199d94a;hb=42489b63e0b4bec2e20c2f55c9791234f7b41764;hp=fe3bc5de2fe88f357baee3e00d259eab152eb120;hpb=032126b098a3600655156bd26ded365953c5283e;p=pspp-builds.git

diff --git a/src/language/expressions/operations.def b/src/language/expressions/operations.def
index fe3bc5de..dbd5ce2b 100644
--- a/src/language/expressions/operations.def
+++ b/src/language/expressions/operations.def
@@ -958,7 +958,7 @@ no_opt string operator STR_VAR ()
 
 no_opt perm_only function LAG (num_var v, pos_int n_before)
 {
-  struct ccase *c = lagged_case (n_before);
+  struct ccase *c = lagged_case (current_dataset, n_before);
   if (c != NULL)
     {
       double x = case_num (c, v->fv);
@@ -970,7 +970,7 @@ no_opt perm_only function LAG (num_var v, pos_int n_before)
 
 no_opt perm_only function LAG (num_var v)
 {
-  struct ccase *c = lagged_case (1);
+  struct ccase *c = lagged_case (current_dataset, 1);
   if (c != NULL)
     {
       double x = case_num (c, v->fv);
@@ -983,7 +983,7 @@ no_opt perm_only function LAG (num_var v)
 no_opt perm_only string function LAG (str_var v, pos_int n_before)
      expression e;
 {
-  struct ccase *c = lagged_case (n_before);
+  struct ccase *c = lagged_case (current_dataset, n_before);
   if (c != NULL)
     return copy_string (e, case_str (c, v->fv), v->width);
   else
@@ -993,7 +993,7 @@ no_opt perm_only string function LAG (str_var v, pos_int n_before)
 no_opt perm_only string function LAG (str_var v)
      expression e;
 {
-  struct ccase *c = lagged_case (1);
+  struct ccase *c = lagged_case (current_dataset, 1);
   if (c != NULL)
     return copy_string (e, case_str (c, v->fv), v->width);
   else