factor/basis/compiler/cfg/builder/alien/alien-tests.factor

USING: alien.c-types compiler.cfg.builder.alien compiler.cfg.instructions
compiler.cfg.registers compiler.cfg.stacks.local compiler.test
cpu.architecture kernel make namespaces tools.test ;
IN: compiler.cfg.builder.alien.tests

{
    { 2 3 }
    { { int-rep f f } { int-rep f f } }
    V{ T{ ##unbox-any-c-ptr { dst 2 } { src 1 } } }
} [
    [ { c-string int } unbox-parameters ] V{ } make
] cfg-unit-test