45 lines
1.1 KiB
Ruby
45 lines
1.1 KiB
Ruby
# A typed method object is a description of the method, it's name etc
|
|
#
|
|
# But the code that the method represents, the binary, is held as an array
|
|
# in one of these.
|
|
#
|
|
|
|
module Parfait
|
|
|
|
class BinaryCode < Data16
|
|
attr_accessor :next
|
|
|
|
def initialize(total_size)
|
|
super()
|
|
if total_size > self.data_length
|
|
@next = BinaryCode.new(total_size - data_length)
|
|
end
|
|
#puts "Init with #{total_size} for #{object_id}"
|
|
end
|
|
def to_s
|
|
"BinaryCode #{}"
|
|
end
|
|
def data_length
|
|
14
|
|
end
|
|
def char_length
|
|
4*data_length
|
|
end
|
|
def set_char(c , index)
|
|
if index >= char_length
|
|
puts "Pass it on #{index} for #{object_id}"
|
|
return @next.set_char( c , index - char_length)
|
|
end
|
|
word_index = (index - 1) / 4 + 2
|
|
old = get_internal_word( word_index )
|
|
old = old && c << ((index-1)%4)
|
|
set_internal_word(word_index , c)
|
|
end
|
|
def total_byte_length(start = 0 )
|
|
start += 4*14
|
|
return start unless self.next
|
|
self.next.total_byte_length(start)
|
|
end
|
|
end
|
|
end
|