tools.ps.macosx: fix for recent change to system-info.macosx.
parent
41fe0673c7
commit
ee9b803252
|
@ -24,7 +24,7 @@ IN: tools.ps.macosx
|
||||||
: hostname ( -- str ) { 1 10 } sysctl-query-string ;
|
: hostname ( -- str ) { 1 10 } sysctl-query-string ;
|
||||||
|
|
||||||
: sysctl-query-bytes ( seq -- n )
|
: sysctl-query-bytes ( seq -- n )
|
||||||
[ make-int-array ] [ length ] bi f 0 uint <ref>
|
[ int >c-array ] [ length ] bi f 0 uint <ref>
|
||||||
[ f 0 sysctl io-error ] keep uint deref ;
|
[ f 0 sysctl io-error ] keep uint deref ;
|
||||||
|
|
||||||
STRUCT: _pcred
|
STRUCT: _pcred
|
||||||
|
|
Loading…
Reference in New Issue