diff --git a/basis/cpu/x86/64/64.factor b/basis/cpu/x86/64/64.factor index 6f7e85ce1b..dc83164b06 100644 --- a/basis/cpu/x86/64/64.factor +++ b/basis/cpu/x86/64/64.factor @@ -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 diff --git a/basis/environment/environment.factor b/basis/environment/environment.factor index abfa04e6a8..121751e07d 100644 --- a/basis/environment/environment.factor +++ b/basis/environment/environment.factor @@ -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