 "Instruction classes for moving values around:"
 { $subsections
   ##copy
+  ##peek
   ##reload
   ##replace
+  ##replace-imm
   ##spill
 }
 "Garbage collection words and instruction classes:"

USING: classes compiler.cfg help.markup help.syntax kernel layouts
slots.private ;
IN: compiler.cfg.instructions

HELP: new-insn

    { { $slot "slot" } { "Slot index." } }
    { { $slot "tag" } { "Type tag for obj." } }
  }
} ;

HELP: ##set-slot-imm
{ $class-description
  "An instruction for what? It has the following slots:"
  { $table
    { { $slot "src" } { "Register containing the value to put in the slot." } }
    { { $slot "obj" } { "Register containing the object to set the slot on.." } }
    { { $slot "slot" } { "Slot index." } }
    { { $slot "tag" } { "Type tag for obj." } }
  }
} ;

{ ##set-slot %set-slot } related-words
{ ##set-slot-imm %set-slot-imm } related-words
{ ##set-slot-imm ##set-slot } related-words

HELP: ##replace-imm
{ $class-description
