enable-cpu-features ( -- )

Vocabulary

cpu.architecture

Word description

This word is run when compiling the compiler during bootstrap and enables optional features that the processor is found to support.

Definition

USING: system ;

IN: cpu.architecture

HOOK: enable-cpu-features cpu ( -- )

Methods

USING: compiler.cfg.intrinsics cpu.architecture system ;

M: arm.64 enable-cpu-features
    enable-min/max enable-log2 enable-bit-test
    enable-alien-4-intrinsics enable-float-min/max
    enable-bit-count enable-float-intrinsics enable-fsqrt ;


USING: compiler compiler.cfg.intrinsics compiler.units
cpu.architecture cpu.x86.features cpu.x86.features.private io
kernel math namespaces sequences system vocabs ;

M: x86 enable-cpu-features
    enable-min/max enable-log2 enable-bit-test cpu x86.64?
    [ enable-alien-4-intrinsics ] when
    optimizing-compiler compiler-impl
    [ { (sse-version) popcnt? } compile ] with-variable
    "Checking for multimedia extensions... " write
    flush sse-version
    [ sse-string " detected" append print ] [
        20 <
        [ "cpu.x86.x87" require ]
        [ "cpu.x86.sse" require enable-float-min/max ] if
    ] bi enable-popcnt?
    [ "Building with POPCNT support" print enable-bit-count ]
    when enable-float-intrinsics enable-fsqrt ;