projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
work on making transformations use relative return values
[pspp]
/
src
/
language
/
control
/
loop.c
diff --git
a/src/language/control/loop.c
b/src/language/control/loop.c
index 34c6a1d36307f254a986357816d2d46cc736e2d3..2505d2ef29f49ce9b343bceaf798e74270a5733b 100644
(file)
--- a/
src/language/control/loop.c
+++ b/
src/language/control/loop.c
@@
-326,10
+326,10
@@
loop_trns_proc (void *loop_, struct ccase **c, casenumber case_num)
&& expr_evaluate_num (loop->loop_condition, *c, case_num) != 1.0)
goto zero_pass;
&& expr_evaluate_num (loop->loop_condition, *c, case_num) != 1.0)
goto zero_pass;
- return
loop->past_LOOP_index
;
+ return
TRNS_CONTINUE
;
zero_pass:
zero_pass:
- return loop->past_END_LOOP_index;
+ return loop->past_END_LOOP_index
- loop->past_LOOP_index + 1
;
}
/* Frees LOOP. */
}
/* Frees LOOP. */
@@
-371,10
+371,10
@@
end_loop_trns_proc (void *loop_, struct ccase **c, casenumber case_num UNUSED)
&& expr_evaluate_num (loop->loop_condition, *c, case_num) != 1.0)
goto break_out;
&& expr_evaluate_num (loop->loop_condition, *c, case_num) != 1.0)
goto break_out;
- return loop->past_LOOP_index;
+ return loop->past_LOOP_index
- loop->past_END_LOOP_index
;
break_out:
break_out:
- return
loop->past_END_LOOP_index
;
+ return
TRNS_CONTINUE
;
}
/* Executes BREAK. */
}
/* Executes BREAK. */