steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

unix.linux.proc: Fix length of meminfo struct on some kernel versions.

db4
Doug Coleman 2014-04-22 00:18:20 -07:00
parent 9780012f55
commit d1d15f83c4
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/unix/linux/proc/proc.factor
View File

@ -182,10 +182,12 @@ TUPLE: proc-meminfo
direct-map-4k direct-map-4k
direct-map-2m ; direct-map-2m ;
! Different kernels have fewer fields. Make sure we have enough.
: parse-proc-meminfo ( -- meminfo ) : parse-proc-meminfo ( -- meminfo )
"/proc/meminfo" utf8 file-lines [ "/proc/meminfo" utf8 file-lines [
" " split harvest second string>number 1024 * " " split harvest second string>number 1024 *
] map [ proc-meminfo boa ] input<sequence ; ] map
50 f pad-tail [ proc-meminfo boa ] input<sequence ;
! All cpu-stat fields are measured in jiffies. ! All cpu-stat fields are measured in jiffies.
TUPLE: proc-stat TUPLE: proc-stat