computer-name ( -- string )

Vocabulary

system-info

Inputs

None

Outputs

string

an object

Definition

USING: system ;

IN: system-info

HOOK: computer-name os ( -- string )

Methods

USING: kernel splitting system system-info unix.sysctl ;

M: macos computer-name
    { 1 10 } sysctl-query-string "." split1 drop ;