renames Typed to Vm
This commit is contained in:
17
test/bench/vm/object.soml
Normal file
17
test/bench/vm/object.soml
Normal file
@ -0,0 +1,17 @@
|
||||
class Object
|
||||
|
||||
Type get_type()
|
||||
return self.type
|
||||
end
|
||||
|
||||
Class get_class()
|
||||
Type l = self.type
|
||||
return l.object_class
|
||||
end
|
||||
|
||||
Word get_class_name()
|
||||
Type l = self.type
|
||||
Class c = l.object_class
|
||||
return c.name
|
||||
end
|
||||
end
|
Reference in New Issue
Block a user