2015-06-20 23:21:42 +02:00
|
|
|
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
|
2015-06-29 09:55:22 +02:00
|
|
|
def initialize type = Unknown, value = nil
|
|
|
|
super( type , value )
|
2015-06-20 23:21:42 +02:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
# named classes exist for slots that often accessed
|
|
|
|
|
2015-06-29 09:55:22 +02:00
|
|
|
# NextReturn is the return of NextMessageSlot
|
2015-06-20 23:21:42 +02:00
|
|
|
class NextReturn < NextMessageSlot
|
|
|
|
def initialize type = Unknown, value = nil
|
2015-06-29 09:55:22 +02:00
|
|
|
super( type , value )
|
2015-06-20 23:21:42 +02:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
2015-06-29 09:55:22 +02:00
|
|
|
# NextSelf is the self of NextMessageSlot
|
2015-06-20 23:21:42 +02:00
|
|
|
class NextSelf < NextMessageSlot
|
|
|
|
def initialize type = Unknown, value = nil
|
2015-06-29 09:55:22 +02:00
|
|
|
super( type , value )
|
2015-06-20 23:21:42 +02:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
# NextMessageName of the next message
|
|
|
|
class NextMessageName < NextMessageSlot
|
|
|
|
def initialize type = Unknown, value = nil
|
2015-06-29 09:55:22 +02:00
|
|
|
super( type , value )
|
2015-06-20 23:21:42 +02:00
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|