basis: Re-enable some things I commented out. Fixes #22. Thanks @ajvondrak!
parent
8b44af4717
commit
262eb73ea6
|
@ -145,11 +145,11 @@ M: x86.64 (cpuid) ( rax rcx regs -- )
|
|||
|
||||
! The result of reading 4 bytes from memory is a fixnum on
|
||||
! x86-64.
|
||||
! enable-alien-4-intrinsics
|
||||
enable-alien-4-intrinsics
|
||||
|
||||
{
|
||||
{ [ os unix? ] [ "cpu.x86.64.unix" require ] }
|
||||
{ [ os windows? ] [ "cpu.x86.64.windows" require ] }
|
||||
} cond
|
||||
|
||||
! check-cpu-features
|
||||
check-cpu-features
|
||||
|
|
|
@ -31,9 +31,9 @@ HOOK: set-os-envs-pointer os ( malloc -- )
|
|||
} cond
|
||||
|
||||
[
|
||||
! "FACTOR_ROOTS" os-env
|
||||
! [
|
||||
! os windows? ";" ":" ? split
|
||||
! [ add-vocab-root ] each
|
||||
! ] when*
|
||||
"FACTOR_ROOTS" os-env
|
||||
[
|
||||
os windows? ";" ":" ? split
|
||||
[ add-vocab-root ] each
|
||||
] when*
|
||||
] "environment" add-startup-hook
|
||||
|
|
Loading…
Reference in New Issue