sub init_all_types {
# Common user-visible types used throughout evaluation trees.
init_type ('number', 'any', C_TYPE => 'double',
sub init_all_types {
# Common user-visible types used throughout evaluation trees.
init_type ('number', 'any', C_TYPE => 'double',
- ATOM => 'number', MANGLE => 'n', HUMAN_NAME => 'num',
+ ATOM => 'number', MANGLE => 'n', HUMAN_NAME => 'number',
STACK => 'ns', MISSING_VALUE => 'SYSMIS');
init_type ('string', 'any', C_TYPE => 'struct substring',
ATOM => 'string', MANGLE => 's', HUMAN_NAME => 'string',
STACK => 'ns', MISSING_VALUE => 'SYSMIS');
init_type ('string', 'any', C_TYPE => 'struct substring',
ATOM => 'string', MANGLE => 's', HUMAN_NAME => 'string',
$ops{$a}->{OPNAME} cmp $ops{$b}->{OPNAME}}
@funcs;
@opers = sort {$ops{$a}->{NAME} cmp $ops{$b}->{NAME}} @opers;
$ops{$a}->{OPNAME} cmp $ops{$b}->{OPNAME}}
@funcs;
@opers = sort {$ops{$a}->{NAME} cmp $ops{$b}->{NAME}} @opers;