emit-no-overflow-case ( dst block -- final-bb )

Vocabulary

compiler.cfg.intrinsics.fixnum

Inputs

dst	an object
block	an object

Outputs

final-bb

an object

Definition

USING: compiler.cfg.builder.blocks compiler.cfg.registers
compiler.cfg.stacks compiler.cfg.stacks.local kernel ;

IN: compiler.cfg.intrinsics.fixnum

: emit-no-overflow-case ( dst block -- final-bb )
    [ swap D: -2 inc-stack ds-push ] with-branch ;