diff --git a/make/pre-make.r3 b/make/pre-make.r3 index 1ed718e2c5..a048d53f10 100644 --- a/make/pre-make.r3 +++ b/make/pre-make.r3 @@ -154,30 +154,30 @@ os-info: get-os-info os: any [ select os-info 'ID all [word? spec/os spec/os] - select #( + select make map! [ Macintosh: macos Windows: windows Linux: linux OpenBSD: openbsd - ) platform + ] platform ] syst: any [ ; none, linux, win32, darwin, cuda, etc. spec/sys spec/kernel - select #( + select make map! [ macos: darwin ios: darwin windows: win32 linux: linux openbsd: openbsd - ) os + ] os ] abi: any [ ; eabi, gnu, android, macho, elf, musl etc. spec/target-abi spec/abi - select #( + select make map! [ macos: macho ios: macho windows: pe @@ -185,7 +185,7 @@ abi: any [ beos: pe linux: elf ;alpine: musl - ) spec/os + ] spec/os ] product: any [spec/product 'Core] diff --git a/make/tools/utils.reb b/make/tools/utils.reb index a46a3aa043..2f5370fdf8 100644 --- a/make/tools/utils.reb +++ b/make/tools/utils.reb @@ -157,7 +157,7 @@ get-os-info: function[ ][ tmp: copy "" err: copy "" - out: copy #() + out: make map! 10 key: charset [#"A"-#"Z" #"_"] enl: system/catalog/bitsets/crlf whs: system/catalog/bitsets/whitespace