 USING: accessors alien.c-types alien.syntax arrays assocs bit-arrays
-classes.struct combinators combinators.short-circuit compiler
+classes.struct combinators combinators.short-circuit compiler compiler.cfg
 compiler.cfg.debugger compiler.cfg.instructions compiler.cfg.linearization
 compiler.cfg.stack-frame compiler.codegen.gc-maps compiler.units fry generic
 grouping io io.encodings.binary io.streams.byte-array kernel math namespaces


! Like word>gc-info but uses the compiler
: word>gc-info-expected ( word -- seq/f )
    test-regs first cfg>gc-maps tally-gc-maps ;

! Handle f f as input. Deferred words don't have any gc-info. See #1394.
: same-gc-info? ( compiler-gc-info/f gc-info/f -- ? )

QUALIFIED: cpu.x86.features.private
QUALIFIED: crypto.aes.utils
QUALIFIED: effects
QUALIFIED: gtk-samples.opengl
QUALIFIED: opencl

: normal? ( word -- ? )
