2015-06-29 20:03:58 +02:00
|
|
|
module Register
|
|
|
|
module Builtin
|
2015-07-01 20:42:31 +02:00
|
|
|
# This is all fantasy at the moment. Not even required, not tested, just an idea
|
|
|
|
# Most likely wrong, in fact so old as to predate the internal_XX stuff
|
|
|
|
class List
|
2015-06-29 20:03:58 +02:00
|
|
|
module ClassMethods
|
|
|
|
def get context , index = Virtual::Integer
|
2015-07-03 19:13:03 +02:00
|
|
|
get_function = Virtual::MethodSource.create_method(:get , [ Virtual::Integer] , Virtual::Integer , Virtual::Integer )
|
2015-06-29 20:03:58 +02:00
|
|
|
return get_function
|
|
|
|
end
|
|
|
|
def set context , index = Virtual::Integer , object = Virtual::Reference
|
2015-07-03 19:13:03 +02:00
|
|
|
set_function = Virtual::MethodSource.create_method(:set , [Virtual::Integer, Virtual::Reference] )
|
2015-06-29 20:03:58 +02:00
|
|
|
return set_function
|
|
|
|
end
|
|
|
|
def push context , object = Virtual::Reference
|
2015-07-03 19:13:03 +02:00
|
|
|
push_function = Virtual::MethodSource.create_method(:push , [Virtual::Reference] )
|
2015-06-29 20:03:58 +02:00
|
|
|
return push_function
|
|
|
|
end
|
2014-08-28 15:39:35 +02:00
|
|
|
end
|
2015-06-29 20:03:58 +02:00
|
|
|
extend ClassMethods
|
2014-08-28 15:39:35 +02:00
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|