Close extends UnaryInstruction and executes its body while it is suspended.
public class Close extends UnaryInstruction
{
public Close(Instruction body){ super.body = body; }
final public String toString(){ return "close " + body; }
final protected byte activation(Machine machine)
{
byte res = SUSP;
while (res == SUSP){ res = body.activ(machine); }
return res;
}
}