X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Fgenerate.pl;h=188d4eb11cc5c86ef3acfe4d868d4b6a6f4582db;hb=339f1956cc72;hp=6f41d7e84215affd05318f4b84068533c043b896;hpb=ff7ae14592cbdbebc4e4322424db95663ea7e166;p=pspp diff --git a/src/language/expressions/generate.pl b/src/language/expressions/generate.pl index 6f41d7e842..188d4eb11c 100644 --- a/src/language/expressions/generate.pl +++ b/src/language/expressions/generate.pl @@ -749,7 +749,7 @@ sub print_range { my ($prefix, $first, $last) = @_; print " ${prefix}_first = $first,\n"; print " ${prefix}_last = $last,\n"; - print " ${prefix}_cnt = ${prefix}_last - ${prefix}_first + 1"; + print " n_${prefix} = ${prefix}_last - ${prefix}_first + 1"; } sub print_predicate { @@ -786,7 +786,7 @@ sub generate_optimize_inc { my ($func) = "get_$type->{ATOM}_arg"; push (@decls, "${ctype}arg_$name = $func (node, $arg_idx)"); } else { - my ($decl) = "size_t arg_$idx = node->arg_cnt"; + my ($decl) = "size_t arg_$idx = node->n_args"; $decl .= " - $arg_idx" if $arg_idx; push (@decls, $decl);