X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Fgenerate.pl;h=c730cf071ed3f00d5aa5ecf7162cc18235e61705;hb=35dac0a274893c6ba1d58d33a0889096eef033b4;hp=6eab24365d624174523872fa6b7e3a01bdc096cc;hpb=613c43f8bc580c48a5a4d8078b83360e29483b38;p=pspp-builds.git

diff --git a/src/language/expressions/generate.pl b/src/language/expressions/generate.pl
index 6eab2436..c730cf07 100644
--- a/src/language/expressions/generate.pl
+++ b/src/language/expressions/generate.pl
@@ -99,6 +99,9 @@ sub init_all_types {
     init_type ('str_var', 'leaf', C_TYPE => 'const struct variable *',
 	       ATOM => 'variable', MANGLE => 'Vs',
 	       HUMAN_NAME => 'string_variable');
+    init_type ('var', 'leaf', C_TYPE => 'const struct variable *',
+	       ATOM => 'variable', MANGLE => 'V',
+	       HUMAN_NAME => 'variable');
 
     # Vectors.
     init_type ('vector', 'leaf', C_TYPE => 'const struct vector *',
@@ -245,6 +248,8 @@ sub parse_input {
 		$op{ABSORB_MISS} = 1;
 	    } elsif (match ('perm_only')) {
 		$op{PERM_ONLY} = 1;
+	    } elsif (match ('no_abbrev')) {
+		$op{NO_ABBREV} = 1;
 	    } else {
 		last;
 	    }