13 lines
535 B
Factor
13 lines
535 B
Factor
|
USING: compiler.cfg compiler.tree help.markup help.syntax quotations ;
|
||
|
|
IN: compiler.cfg.intrinsics.alien
|
||
|
|
|
||
|
|
HELP: inline-accessor
|
||
|
|
{ $values
|
||
|
|
{ "block" basic-block }
|
||
|
|
{ "#call" #call }
|
||
|
|
{ "quot" quotation }
|
||
|
|
{ "test" quotation }
|
||
|
|
{ "block'" basic-block }
|
||
|
|
}
|
||
|
|
{ $description "Combinator used to simplify writing intrinsic emitting code. If the 'test' quotation yields " { $link t } " when called on the '#call' nodes inputs, then the 'quot' quotation is used to emit intrinsic instructions. Otherwise a primitive call is emitted. " } ;
|