system: Move cpu string to Factor area so it's more obvious that it applies to Factor and not to the C++ compiler.
parent
b377ea313c
commit
0f59f314f5
|
@ -1,7 +1,7 @@
|
||||||
! Copyright (C) 2007, 2010 Slava Pestov.
|
! copyright (c) 2007, 2010 slava pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: assocs continuations init io kernel kernel.private
|
USING: assocs continuations init io kernel kernel.private make
|
||||||
layouts make math.parser namespaces sequences ;
|
math.parser namespaces sequences ;
|
||||||
IN: system
|
IN: system
|
||||||
|
|
||||||
SINGLETONS: x86.32 x86.64 arm ppc.32 ppc.64 ;
|
SINGLETONS: x86.32 x86.64 arm ppc.32 ppc.64 ;
|
||||||
|
@ -68,11 +68,11 @@ PRIVATE>
|
||||||
! formatting vocab not available in this context.
|
! formatting vocab not available in this context.
|
||||||
[
|
[
|
||||||
"Factor " % vm-version %
|
"Factor " % vm-version %
|
||||||
" " % cell-bits #
|
" " % cpu cpu>string %
|
||||||
"-bit build: " % build #
|
" build: " % build #
|
||||||
" (" % vm-git-label % ", " %
|
" (" % vm-git-label % ", " %
|
||||||
vm-compile-time % ") [" %
|
vm-compile-time % ") [" %
|
||||||
vm-compiler % " " % cpu cpu>string % "] on " % os os>string %
|
vm-compiler % "] on " % os os>string %
|
||||||
] "" make ;
|
] "" make ;
|
||||||
|
|
||||||
: exit ( n -- * )
|
: exit ( n -- * )
|
||||||
|
|
Loading…
Reference in New Issue