module Virtual

  # The next Message is one of four objects the virtual machine knows
  #
  # Slots represent instance variables of objects, so NextMessageSlots
  # represent instance variables of NextMessage objects.
  # The Message has a layout as per the constant above

  class NextMessageSlot < Slot
    def initialize index , type = Unknown, value = nil
      super(index , type , value )
    end
  end

  # named classes exist for slots that often accessed

  # NextReturn is the NextMessageSlot(MESSAGE_RETURN_VALUE)
  class NextReturn < NextMessageSlot
    def initialize type = Unknown, value = nil
      super( MESSAGE_RETURN_VALUE, type , value  )
    end
  end

  # NextSelf is the NextMessageSlot(MESSAGE_SELF)
  class NextSelf < NextMessageSlot
    def initialize type = Unknown, value = nil
      super( MESSAGE_SELF , type , value  )
    end
  end

  # NextMessageName of the next message
  class NextMessageName < NextMessageSlot
    def initialize type = Unknown, value = nil
      super( MESSAGE_NAME, type , value )
    end
  end
end