emit-identity-hashcode ( -- )

Vocabulary

compiler.cfg.intrinsics.misc

Inputs

None

Outputs

None

Definition

USING: compiler.cfg.hats compiler.cfg.stacks cpu.architecture
layouts math namespaces ;

IN: compiler.cfg.intrinsics.misc

: emit-identity-hashcode ( -- )
    [
        ^^tagged>integer tag-mask get bitnot ^^load-integer
        ^^and 0 int-rep f ^^load-memory-imm
        hashcode-shift ^^shr-imm
    ] unary-op ;