diff --git a/ChangeLog b/ChangeLog index 31b978e1..5d5d28f8 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,8 @@ 1999-12-05 Martin Baulig + * features.def: Use `pointer()' as return value for functions + returning an array of scalar values (such as `unsigned' etc.). + * features.def: Use `array()' as return value for functions returning an array of structures. diff --git a/features.def b/features.def index 68c9776b..c86f333a 100644 --- a/features.def +++ b/features.def @@ -6,7 +6,7 @@ retval|loadavg|double(loadavg[3]):ulong(nr_running,nr_tasks,last_pid) retval|shm_limits|ulong(shmmax,shmmin,shmmni,shmseg,shmall) retval|msg_limits|ulong(msgpool,msgmap,msgmax,msgmnb,msgmni,msgssz,msgtql) retval|sem_limits|ulong(semmap,semmni,semmns,semmnu,semmsl,semopm,semume,semusz,semvmx,semaem) -unsigned *|proclist|ulong(number,size,total)|long(which,arg) +pointer(unsigned)|proclist|ulong(number,size,total)|long(which,arg) retval|proc_state|str(cmd):unsigned(state):ulong(uid,gid,ruid,rgid,has_cpu,processor,last_processor)|pid_t(pid) retval|proc_uid|long(uid,euid,gid,egid,suid,sgid,fsuid,fsgid,pid,ppid,pgrp,session,tty,tpgid,priority,nice,ngroups,groups[GLIBTOP_MAX_GROUPS])|pid_t(pid) retval|proc_mem|long(size,vsize,resident,share,rss,rss_rlim)|pid_t(pid) diff --git a/lib/lib.pl b/lib/lib.pl index a12979c2..83a32320 100755 --- a/lib/lib.pl +++ b/lib/lib.pl @@ -112,8 +112,8 @@ sub output { $prefix_space = ''; } - if ($retval =~ /^array\((.*)\)$/) { - $retval = "$1 *"; + if ($retval =~ /^(array|pointer)\((.*)\)$/) { + $retval = "$2 *"; } $check_server_code = "\n";