bootstrap.image: images -> image-strings
parent
923df44ec3
commit
351f51b72e
|
@ -28,7 +28,7 @@ IN: bootstrap.image
|
||||||
: my-boot-image-name ( -- string )
|
: my-boot-image-name ( -- string )
|
||||||
my-arch boot-image-name ;
|
my-arch boot-image-name ;
|
||||||
|
|
||||||
CONSTANT: images
|
CONSTANT: image-strings
|
||||||
{
|
{
|
||||||
"windows-x86.32" "unix-x86.32"
|
"windows-x86.32" "unix-x86.32"
|
||||||
"windows-x86.64" "unix-x86.64"
|
"windows-x86.64" "unix-x86.64"
|
||||||
|
@ -596,7 +596,7 @@ PRIVATE>
|
||||||
] with-variables ;
|
] with-variables ;
|
||||||
|
|
||||||
: make-images ( -- )
|
: make-images ( -- )
|
||||||
images [ make-image ] each ;
|
image-strings [ make-image ] each ;
|
||||||
|
|
||||||
: make-my-image ( -- )
|
: make-my-image ( -- )
|
||||||
my-arch make-image ;
|
my-arch make-image ;
|
||||||
|
|
Loading…
Reference in New Issue