2014-07-21 12:30:42 -04:00
|
|
|
USING: compiler.cfg.instructions help.markup help.syntax sequences ;
|
|
|
|
IN: compiler.cfg.def-use
|
|
|
|
|
|
|
|
HELP: defs-vregs
|
|
|
|
{ $values { "insn" insn } { "seq" sequence } }
|
|
|
|
{ $description "Returns the sequence of vregs defined, or introduced, by this instruction." }
|
|
|
|
{ $examples
|
|
|
|
{ $example
|
2014-08-14 12:59:27 -04:00
|
|
|
"USING: compiler.cfg.def-use compiler.cfg.instructions compiler.cfg.registers prettyprint ;"
|
2014-07-21 12:30:42 -04:00
|
|
|
"T{ ##peek f 37 D 0 0 } defs-vregs ."
|
|
|
|
"{ 37 }"
|
|
|
|
}
|
|
|
|
} ;
|
|
|
|
|
|
|
|
HELP: uses-vregs
|
|
|
|
{ $values { "insn" insn } { "seq" sequence } }
|
|
|
|
{ $description "Returns the sequence of vregs used by this instruction." }
|
|
|
|
{ $examples
|
|
|
|
{ $example
|
2014-08-14 12:59:27 -04:00
|
|
|
"USING: compiler.cfg.def-use compiler.cfg.instructions compiler.cfg.registers prettyprint ;"
|
2014-07-21 12:30:42 -04:00
|
|
|
"T{ ##replace f 37 D 1 6 } uses-vregs ."
|
|
|
|
"{ 37 }"
|
|
|
|
}
|
|
|
|
} ;
|
2014-11-15 01:56:36 -05:00
|
|
|
|
|
|
|
HELP: temp-vregs
|
|
|
|
{ $values { "insn" insn } { "seq" sequence } }
|
|
|
|
{ $description "Returns the sequence of temporary vregs used by this instruction." } ;
|