projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Use a casefile, instead of a case sink, for MATCH FILES output.
[pspp]
/
src
/
language
/
expressions
/
generate.pl
diff --git
a/src/language/expressions/generate.pl
b/src/language/expressions/generate.pl
index 9d753867cc1f72865e8d251d289748fa21e0926b..4ad1764b1c3c96152703b90e8a22afb85f8120db 100644
(file)
--- a/
src/language/expressions/generate.pl
+++ b/
src/language/expressions/generate.pl
@@
-233,6
+233,7
@@
sub parse_input {
$op{OPTIMIZABLE} = 1;
$op{UNIMPLEMENTED} = 0;
$op{EXTENSION} = 0;
$op{OPTIMIZABLE} = 1;
$op{UNIMPLEMENTED} = 0;
$op{EXTENSION} = 0;
+ $op{PERM_ONLY} = 0;
for (;;) {
if (match ('extension')) {
$op{EXTENSION} = 1;
for (;;) {
if (match ('extension')) {
$op{EXTENSION} = 1;
@@
-240,6
+241,8
@@
sub parse_input {
$op{OPTIMIZABLE} = 0;
} elsif (match ('absorb_miss')) {
$op{ABSORB_MISS} = 1;
$op{OPTIMIZABLE} = 0;
} elsif (match ('absorb_miss')) {
$op{ABSORB_MISS} = 1;
+ } elsif (match ('perm_only')) {
+ $op{PERM_ONLY} = 1;
} else {
last;
}
} else {
last;
}