(%write-barrier) ( temp1 temp2 -- )

Vocabulary

cpu.x86

Inputs

temp1	an object
temp2	an object

Outputs

None

Definition

USING: compiler.constants cpu.x86.assembler math ;

IN: cpu.x86

:: (%write-barrier) ( temp1 temp2 -- )
    temp1 card-bits SHR temp1 temp2 %mark-card
    temp1 deck-bits card-bits - SHR temp1 temp2 %mark-deck ;