Prohibit LAG following TEMPORARY. This both matches SPSS behavior and

[pspp-builds.git] / src / language / expressions / parse.inc.pl

diff --git a/src/language/expressions/parse.inc.pl b/src/language/expressions/parse.inc.pl
index ea878c92ccec4fe8db8a603a416203803da78689..47c590fb306f2c06bc7e1abb8ede6fbdf5773967 100644 (file)
--- a/src/language/expressions/parse.inc.pl
+++ b/src/language/expressions/parse.inc.pl
@@ -55,6 +55,7 @@ sub generate_output {
        push (@flags, "OPF_NONOPTIMIZABLE") if !$op->{OPTIMIZABLE};
        push (@flags, "OPF_EXTENSION") if $op->{EXTENSION};
        push (@flags, "OPF_UNIMPLEMENTED") if $op->{UNIMPLEMENTED};
+       push (@flags, "OPF_PERM_ONLY") if $op->{PERM_ONLY};
        push (@members, @flags ? join (' | ', @flags) : 0);
 
        push (@members, "OP_$op->{RETURNS}{NAME}");