Class: Opal::Nodes::DefinedNode

10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29

# File 'opal/lib/opal/nodes/defined.rb', line 10
def compile
 type = value.type
 case type
 when :self, :nil, :false, :true
 push type.to_s.inspect
 when :lasgn, :iasgn, :gasgn, :cvdecl, :masgn, :op_asgn_or, :op_asgn_and
 push "'assignment'"
 when :paren, :not
 push expr(s(:defined, value[1]))
 when :lvar
 push "'local-variable'"
 else
 if respond_to? "compile_#{type}"
 __send__ "compile_#{type}"
 else
 push "'expression'"
 end
 end
end

31
32
33
34
35
36
37
38
39

# File 'opal/lib/opal/nodes/defined.rb', line 31
def compile_call
 mid = mid_to_jsid value[2].to_s
 recv = value[1] ? expr(value[1]) : 'self'
 with_temp do |tmp|
 push "(((#{tmp} = ", recv, "#{mid}) && !#{tmp}.$$stub) || ", recv
 push "['$respond_to_missing?']('#{value[2].to_s}') ? 'method' : nil)"
 end
end

73
74
75
76
77
78
79
80

# File 'opal/lib/opal/nodes/defined.rb', line 73
def compile_colon2
 # TODO: avoid try/catch, probably a #process_colon2 alternative that
 # does not raise errors is needed
 push "(function(){ try { return (("
 push expr(value)
 push ") != null ? 'constant' : nil); } catch (err) { if (err.$$class"
 push " === Opal.NameError) { return nil; } else { throw(err); }}; })()"
end

82
83
84

# File 'opal/lib/opal/nodes/defined.rb', line 82
def compile_colon3
 push "(Opal.Object.$$scope.#{value[1]} == null ? nil : 'constant')"
end

69
70
71

# File 'opal/lib/opal/nodes/defined.rb', line 69
def compile_const
 push "($scope.#{value[1]} != null)"
end

86
87
88

# File 'opal/lib/opal/nodes/defined.rb', line 86
def compile_cvar
 push "(Opal.cvars['#{value[1]}'] != null ? 'class variable' : nil)"
end

90
91
92
93
94
95
96
97
98
99
100
101
102
103

# File 'opal/lib/opal/nodes/defined.rb', line 90
def compile_gvar
 name = value[1].to_s[1..-1]
 if %w[~!].include? name
 push "'global-variable'"
 elsif %w[`'+&].include? name
 with_temp do |tmp|
 push "((#{tmp} = $gvars['~'], #{tmp} != null && #{tmp} !== nil) ? "
 push "'global-variable' : nil)"
 end
 else
 push "($gvars[#{name.inspect}] != null ? 'global-variable' : nil)"
 end
end

41
42
43
44
45
46
47
48
49
50
51
52

# File 'opal/lib/opal/nodes/defined.rb', line 41
def compile_ivar
 # FIXME: this check should be positive for ivars initialized as nil too.
 # Since currently all known ivars are inialized to nil in the constructor
 # we can't tell if it was the user that put nil and made the ivar #defined?
 # or not.
 with_temp do |tmp|
 name = value[1].to_s[1..-1]
 push "((#{tmp} = self['#{name}'], #{tmp} != null && #{tmp} !== nil) ? "
 push "'instance-variable' : nil)"
 end
end

105
106
107
108
109
110

# File 'opal/lib/opal/nodes/defined.rb', line 105
def compile_nth_ref
 with_temp do |tmp|
 push "((#{tmp} = $gvars['~'], #{tmp} != null && #{tmp} != nil) ? "
 push "'global-variable' : nil)"
 end
end

54
55
56

# File 'opal/lib/opal/nodes/defined.rb', line 54
def compile_super
 push expr(s(:defined_super, value))
end

63
64
65
66

# File 'opal/lib/opal/nodes/defined.rb', line 63
def compile_xstr
 push expr(value)
 wrap '(typeof(', ') !== "undefined")'
end

58
59
60
61

# File 'opal/lib/opal/nodes/defined.rb', line 58
def compile_yield
 push compiler.handle_block_given_call(@sexp)
 wrap '((', ') != null ? "yield" : nil)'
end