X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Fparse.inc.pl;h=bab06d24517a423502e5ac0b7ffa3e5a61382aa0;hb=8b708f4291deb6ee408e8f62a694b638c581c40e;hp=ea878c92ccec4fe8db8a603a416203803da78689;hpb=dcf9b154cbcaa35c3d8459a201b77eec8bcb30bd;p=pspp

diff --git a/src/language/expressions/parse.inc.pl b/src/language/expressions/parse.inc.pl
index ea878c92cc..bab06d2451 100644
--- a/src/language/expressions/parse.inc.pl
+++ b/src/language/expressions/parse.inc.pl
@@ -55,6 +55,8 @@ 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 (@flags, "OPF_NO_ABBREV") if $op->{NO_ABBREV};
 	push (@members, @flags ? join (' | ', @flags) : 0);
 
 	push (@members, "OP_$op->{RETURNS}{NAME}");