Module: FastRuby::ExceptionsTranslator
- Defined in:
- lib/fastruby/translator/modules/exceptions.rb
Instance Method Summary collapse
- #_raise(class_tree, message_tree = nil) ⇒ Object
- #to_c_ensure(tree) ⇒ Object
- #to_c_rescue(tree) ⇒ Object
Instance Method Details
#_raise(class_tree, message_tree = nil) ⇒ Object
108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 |
# File 'lib/fastruby/translator/modules/exceptions.rb', line 108 def _raise(class_tree, = nil) class_tree = to_c class_tree unless class_tree.instance_of? String if .instance_of? String = "rb_str_new2(#{.inspect})" else = to_c end if return inline_block(" pframe->thread_data->exception = rb_funcall(#{class_tree}, #{intern_num :exception},1,#{}); longjmp(pframe->jmp, FASTRUBY_TAG_RAISE); return Qnil; ") else return inline_block(" pframe->thread_data->exception = rb_funcall(#{class_tree}, #{intern_num :exception},0); longjmp(pframe->jmp, FASTRUBY_TAG_RAISE); return Qnil; ") end end |
#to_c_ensure(tree) ⇒ Object
97 98 99 100 101 102 103 104 105 106 |
# File 'lib/fastruby/translator/modules/exceptions.rb', line 97 def to_c_ensure(tree) if tree.size == 2 to_c tree[1] else ensured_code = to_c tree[2] inline_block " #{frame(to_c(tree[1]),ensured_code,ensured_code,1)}; " end end |
#to_c_rescue(tree) ⇒ Object
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 56 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 95 |
# File 'lib/fastruby/translator/modules/exceptions.rb', line 26 def to_c_rescue(tree) if tree[1][0] == :resbody else_tree = tree[2] if else_tree to_c else_tree else "Qnil" end else resbody_tree = tree[2] else_tree = nil if tree[-1] if tree[-1][0] != :resbody else_tree = tree[-1] end end catch_condition_array = [] lasgn_code = "" resbody_code = to_c(resbody_tree[2]) rescue_code = "" tree[1..-1].each do |resbody_tree| next if resbody_tree[0] != :resbody if resbody_tree[1].size == 1 resbody_tree[1][1] = [:const, :Exception] end if resbody_tree[1].last[0] == :lasgn lasgn_code = to_c(resbody_tree[1].last) end resbody_tree[1][1..-1].each do |xtree| if xtree[0] != :lasgn trapcode = "rb_eException"; if xtree trapcode = to_c(xtree) end catch_condition_array << "(rb_obj_is_kind_of(frame.thread_data->exception,#{trapcode}) == Qtrue)" end end rescue_code << " if (aux == FASTRUBY_TAG_RAISE) { if (#{catch_condition_array.join(" || ")}) { // trap exception frame.targetted = 1; #{lasgn_code}; #{resbody_code}; } } " end frame_call( "ret = " + frame(to_c(tree[1])+";"," #{rescue_code} ", else_tree ? to_c(else_tree) : nil, 1) ) end end |