 ! Copyright (c) 2007, 2010 slava pestov.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: assocs continuations init io kernel kernel.private make
+USING: accessors assocs continuations init io kernel kernel.private make
 math math.parser namespaces sequences ;
 IN: system
 

    ! formatting vocab not available in this context.
    [
        "Factor " % vm-version %
        " " % cpu cpu>string %
        " (" % build # ", " %
        vm-git-ref % "-" %
        vm-git-id 10 short head % ", " %
        vm-compile-time % ")\n[" %
        vm-compiler % "] on " % os os>string %
    ] "" make ;

: exit ( n -- * )

: string>cpu ( str -- class )
    string>cpu-hash at ;

: string>os ( str -- class )
    string>os-hash at ;

PRIVATE>

