Module: Ruby2JS::Filter::RubyJS

Includes:
SEXP
Defined in:
lib/ruby2js/filter/rubyjs.rb

Instance Method Summary collapse

Methods included from SEXP

#s

Instance Method Details

#on_block(node) ⇒ Object 



57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
 
# File 'lib/ruby2js/filter/rubyjs.rb', line 57

def on_block(node)
  call, args, *block = node.children

  if 
    [:collect_concat, :count, :cycle, :delete_if, :drop_while,
    :each_index, :each_slice, :each_with_index, :each_with_object,
    :find, :find_all, :flat_map, :inject, :grep, :group_by, :keep_if,
    :map, :max_by, :min_by, :one?, :partition, :reject, :reverse_each,
    :select!, :sort_by, :take_while].include? call.children[1]
  then
    if 
      [:collect_concat, :count, :delete_if, :drop_while, :find,
      :find_all, :flat_map, :grep, :group_by, :keep_if, :map, :max_by,
      :min_by, :one?, :partition, :reject, :select!, :sort_by,
      :take_while].include? call.children[1]
    then
      block = [ s(:autoreturn, *block) ]
    end

    lvar = [:each_index, :keep_if, :select!].
      include?(call.children[1]) ? :_a : :_e

    if call.children[1] == :find and call.children.length == 2
      call = s(:send, *call.children, s(:nil))
    elsif call.children[1] == :inject and call.children.length == 3
      call = s(:send, *call.children, s(:nil))
    elsif call.children[1] == :select!
      call = s(:send, call.children.first, :select_bang,
        *call.children[2..-1])
    end

    s(:block, s(:send, s(:lvar, lvar), call.children[1],
      *process_all([call.children[0], *call.children[2..-1]])),
      args, *block)
  else
    super
  end
end

#on_erange(node) ⇒ Object 



100
101
102
103
 
# File 'lib/ruby2js/filter/rubyjs.rb', line 100

def on_erange(node)
  s(:send, s(:attr, s(:const, nil, :R), :Range), :new, *node.children,
    s(:true))
end

#on_irange(node) ⇒ Object 



96
97
98
 
# File 'lib/ruby2js/filter/rubyjs.rb', line 96

def on_irange(node)
  s(:send, s(:attr, s(:const, nil, :R), :Range), :new, *node.children)
end

#on_send(node) ⇒ Object 



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
46
47
48
49
50
51
52
53
54
55
 
# File 'lib/ruby2js/filter/rubyjs.rb', line 8

def on_send(node)
  # leave functional style calls alone
  target = node.children.first
  return super if target and [:_s, :_a, :_h, :_n, :_i, :_t].
    include? target.children[1]

  # leave classic ("OO") style call chains alone
  while target and target.type == :send
    return super if target.children[1] == :R
    target = target.children.first
  end

  if 
    [:capitalize, :center, :chomp, :ljust, :lstrip, :rindex, :rjust,
      :rstrip, :scan, :swapcase, :tr].include? node.children[1]
  then
    # map selected string functions
    s(:send, s(:lvar, :_s), node.children[1],
      *process_all([node.children[0], *node.children[2..-1]]))

  elsif 
    [:at, :compact, :compact!, :delete_at, :delete_at, :flatten, :insert,
    :reverse, :reverse!, :rotate, :rotate, :rotate!, :shift, :shuffle,
    :shuffle!, :slice, :slice!, :transpose, :union, :uniq, :uniq!]
    .include? node.children[1]
  then
    # map selected array functions
    s(:send, s(:lvar, :_a), node.children[1].to_s.sub("!", '_bang'),
      *process_all([node.children[0], *node.children[2..-1]]))


  elsif [:strftime].include? node.children[1]
    # map selected time functions
    s(:send, s(:lvar, :_t), node.children[1],
      *process_all([node.children[0], *node.children[2..-1]]))

  elsif node.children[1] == :<=>
    s(:send, s(:attr, s(:const, nil, :R), :Comparable), :cmp,
      node.children[0], *node.children[2..-1])

  elsif node.children[1] == :between?
    s(:send, s(:send, nil, :R, node.children[0]), :between,
      *node.children[2..-1])

  else
    super
  end
end