1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
|
module BERT
class Encoder
# Encode a Ruby object into a BERT.
# +ruby+ is the Ruby object
#
# Returns a BERT
def self.encode(ruby)
complex_ruby = convert(ruby)
Encode.encode(complex_ruby)
end
# Convert complex Ruby form in simple Ruby form.
# +item+ is the Ruby object to convert
#
# Returns the converted Ruby object
def self.convert(item)
case item
when Hash
pairs = []
item.each_pair { |k, v| pairs << t[convert(k), convert(v)] }
t[:bert, :dict, pairs]
when Tuple
Tuple.new(item.map { |x| convert(x) })
when Array
item.map { |x| convert(x) }
when nil
t[:bert, :nil]
when TrueClass
t[:bert, :true]
when FalseClass
t[:bert, :false]
when Time
t[:bert, :time, item.to_i / 1_000_000, item.to_i % 1_000_000, item.usec]
when Regexp
options = []
options << :caseless if item.options & Regexp::IGNORECASE > 0
options << :extended if item.options & Regexp::EXTENDED > 0
options << :multiline if item.options & Regexp::MULTILINE > 0
t[:bert, :regex, item.source, options]
else
item
end
end
end
end
|
