Class: Ruby2Ruby
- Inherits:
-
SexpProcessor
- Object
- SexpProcessor
- Ruby2Ruby
- Defined in:
- lib/ruby2ruby.rb
Overview
Generate ruby code from a sexp.
Constant Summary collapse
- VERSION =
:nodoc:
"2.4.2"
- LINE_LENGTH =
cutoff for one-liners
78
- BINARY =
binary operation messages
[:<=>, :==, :<, :>, :<=, :>=, :-, :+, :*, :/, :%, :<<, :>>, :**, :'!=', :^, :|, :&]
- ASSIGN_NODES =
Nodes that represent assignment and probably need () around them.
TODO: this should be replaced with full precedence support :/
[ :dasgn, :flip2, :flip3, :lasgn, :masgn, :match3, :attrasgn, :op_asgn1, :op_asgn2, :op_asgn_and, :op_asgn_or, :return, :if, # HACK :rescue, ]
- HASH_VAL_NO_PAREN =
Some sexp types are OK without parens when appearing as hash values. This list can include ‘:call`s because they’re always printed with parens around their arguments. For example:
{ :foo => (("baz")) } # The outer parens are unnecessary { :foo => ("baz") } # This is the normal code style
[ :call, :false, :lit, :lvar, :nil, :str, :true ]
Instance Method Summary collapse
-
#cond_loop(exp, name) ⇒ Object
Generate a post-or-pre conditional loop.
-
#dthing_escape(type, lit) ⇒ Object
Utility method to escape something interpolated.
-
#indent(s) ⇒ Object
Indent all lines of
s
to the current indent level. -
#initialize ⇒ Ruby2Ruby
constructor
:nodoc:.
-
#parenthesize(exp) ⇒ Object
Wrap appropriate expressions in matching parens.
-
#process_alias(exp) ⇒ Object
Processors.
-
#process_and(exp) ⇒ Object
:nodoc:.
-
#process_arglist(exp) ⇒ Object
custom made node # :nodoc:.
-
#process_args(exp) ⇒ Object
:nodoc:.
-
#process_array(exp) ⇒ Object
:nodoc:.
-
#process_attrasgn(exp) ⇒ Object
:nodoc:.
-
#process_back_ref(exp) ⇒ Object
:nodoc:.
-
#process_begin(exp) ⇒ Object
TODO: figure out how to do rescue and ensure ENTIRELY w/o begin.
-
#process_block(exp) ⇒ Object
:nodoc:.
-
#process_block_pass(exp) ⇒ Object
:nodoc:.
-
#process_break(exp) ⇒ Object
:nodoc:.
-
#process_call(exp, safe_call = false) ⇒ Object
:nodoc:.
-
#process_case(exp) ⇒ Object
:nodoc:.
-
#process_cdecl(exp) ⇒ Object
:nodoc:.
-
#process_class(exp) ⇒ Object
:nodoc:.
-
#process_colon2(exp) ⇒ Object
:nodoc:.
-
#process_colon3(exp) ⇒ Object
:nodoc:.
-
#process_const(exp) ⇒ Object
:nodoc:.
-
#process_cvar(exp) ⇒ Object
:nodoc:.
-
#process_cvasgn(exp) ⇒ Object
:nodoc:.
-
#process_cvdecl(exp) ⇒ Object
:nodoc:.
-
#process_defined(exp) ⇒ Object
:nodoc:.
-
#process_defn(exp) ⇒ Object
:nodoc:.
-
#process_defs(exp) ⇒ Object
:nodoc:.
-
#process_dot2(exp) ⇒ Object
:nodoc:.
-
#process_dot3(exp) ⇒ Object
:nodoc:.
-
#process_dregx(exp) ⇒ Object
:nodoc:.
-
#process_dregx_once(exp) ⇒ Object
:nodoc:.
-
#process_dstr(exp) ⇒ Object
:nodoc:.
-
#process_dsym(exp) ⇒ Object
:nodoc:.
-
#process_dxstr(exp) ⇒ Object
:nodoc:.
-
#process_ensure(exp) ⇒ Object
:nodoc:.
-
#process_evstr(exp) ⇒ Object
:nodoc:.
-
#process_false(exp) ⇒ Object
:nodoc:.
-
#process_flip2(exp) ⇒ Object
:nodoc:.
-
#process_flip3(exp) ⇒ Object
:nodoc:.
-
#process_for(exp) ⇒ Object
:nodoc:.
-
#process_gasgn(exp) ⇒ Object
:nodoc:.
-
#process_gvar(exp) ⇒ Object
:nodoc:.
-
#process_hash(exp) ⇒ Object
:nodoc:.
-
#process_iasgn(exp) ⇒ Object
:nodoc:.
-
#process_if(exp) ⇒ Object
:nodoc:.
-
#process_iter(exp) ⇒ Object
:nodoc:.
-
#process_ivar(exp) ⇒ Object
:nodoc:.
- #process_kwsplat(exp) ⇒ Object
-
#process_lasgn(exp) ⇒ Object
:nodoc:.
-
#process_lit(exp) ⇒ Object
:nodoc:.
-
#process_lvar(exp) ⇒ Object
:nodoc:.
-
#process_masgn(exp) ⇒ Object
:nodoc:.
-
#process_match(exp) ⇒ Object
:nodoc:.
-
#process_match2(exp) ⇒ Object
:nodoc:.
-
#process_match3(exp) ⇒ Object
:nodoc:.
-
#process_module(exp) ⇒ Object
:nodoc:.
-
#process_next(exp) ⇒ Object
:nodoc:.
-
#process_nil(exp) ⇒ Object
:nodoc:.
-
#process_not(exp) ⇒ Object
:nodoc:.
-
#process_nth_ref(exp) ⇒ Object
:nodoc:.
-
#process_op_asgn(exp) ⇒ Object
:nodoc:.
-
#process_op_asgn1(exp) ⇒ Object
:nodoc:.
-
#process_op_asgn2(exp) ⇒ Object
:nodoc:.
-
#process_op_asgn_and(exp) ⇒ Object
:nodoc:.
-
#process_op_asgn_or(exp) ⇒ Object
:nodoc:.
-
#process_or(exp) ⇒ Object
:nodoc:.
-
#process_postexe(exp) ⇒ Object
:nodoc:.
-
#process_redo(exp) ⇒ Object
:nodoc:.
-
#process_resbody(exp) ⇒ Object
:nodoc:.
-
#process_rescue(exp) ⇒ Object
:nodoc:.
-
#process_retry(exp) ⇒ Object
:nodoc:.
-
#process_return(exp) ⇒ Object
:nodoc:.
-
#process_safe_attrasgn(exp) ⇒ Object
:nodoc:.
-
#process_safe_call(exp) ⇒ Object
:nodoc:.
-
#process_safe_op_asgn(exp) ⇒ Object
:nodoc:.
-
#process_safe_op_asgn2(exp) ⇒ Object
:nodoc:.
-
#process_sclass(exp) ⇒ Object
:nodoc:.
-
#process_self(exp) ⇒ Object
:nodoc:.
-
#process_splat(exp) ⇒ Object
:nodoc:.
-
#process_str(exp) ⇒ Object
:nodoc:.
-
#process_super(exp) ⇒ Object
:nodoc:.
-
#process_svalue(exp) ⇒ Object
:nodoc:.
-
#process_to_ary(exp) ⇒ Object
:nodoc:.
-
#process_true(exp) ⇒ Object
:nodoc:.
-
#process_undef(exp) ⇒ Object
:nodoc:.
-
#process_until(exp) ⇒ Object
:nodoc:.
-
#process_valias(exp) ⇒ Object
:nodoc:.
-
#process_when(exp) ⇒ Object
:nodoc:.
-
#process_while(exp) ⇒ Object
:nodoc:.
-
#process_xstr(exp) ⇒ Object
:nodoc:.
-
#process_yield(exp) ⇒ Object
:nodoc:.
-
#process_zsuper(exp) ⇒ Object
:nodoc:.
-
#re_opt(options) ⇒ Object
Return the appropriate regexp flags for a given numeric code.
-
#rewrite_attrasgn(exp) ⇒ Object
Rewriters:.
-
#rewrite_call(exp) ⇒ Object
:nodoc:.
-
#rewrite_ensure(exp) ⇒ Object
:nodoc:.
-
#rewrite_if(exp) ⇒ Object
:nodoc:.
-
#rewrite_resbody(exp) ⇒ Object
:nodoc:.
-
#rewrite_rescue(exp) ⇒ Object
:nodoc:.
-
#rewrite_svalue(exp) ⇒ Object
:nodoc:.
-
#rewrite_until(exp) ⇒ Object
:nodoc:.
-
#rewrite_while(exp) ⇒ Object
:nodoc:.
-
#splat(sym) ⇒ Object
Return a splatted symbol for
sym
. -
#util_dthing(type, exp) ⇒ Object
Utility method to generate something interpolated.
-
#util_module_or_class(exp, is_class = false) ⇒ Object
Utility method to generate ether a module or class.
Constructor Details
#initialize ⇒ Ruby2Ruby
:nodoc:
82 83 84 85 86 87 88 89 90 91 92 |
# File 'lib/ruby2ruby.rb', line 82 def initialize # :nodoc: super @indent = " " self.require_empty = false self.strict = true self.expected = String @calls = [] # self.debug[:defn] = /zsuper/ end |
Instance Method Details
#cond_loop(exp, name) ⇒ Object
Generate a post-or-pre conditional loop.
1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 |
# File 'lib/ruby2ruby.rb', line 1162 def cond_loop(exp, name) _, cond, body, head_controlled = exp cond = process cond body = process body body = indent(body).chomp if body code = [] if head_controlled then code << "#{name} #{cond} do" code << body if body code << "end" else code << "begin" code << body if body code << "end #{name} #{cond}" end code.join("\n") end |
#dthing_escape(type, lit) ⇒ Object
Utility method to escape something interpolated.
1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 |
# File 'lib/ruby2ruby.rb', line 1187 def dthing_escape type, lit # TODO: this needs more testing case type when :dregx then lit.gsub(/(\A|[^\\])\//, '\1\/') when :dstr, :dsym then lit.dump[1..-2] when :dxstr then lit.gsub(/`/, '\`') else raise "unsupported type #{type.inspect}" end end |
#indent(s) ⇒ Object
Indent all lines of s
to the current indent level.
1204 1205 1206 |
# File 'lib/ruby2ruby.rb', line 1204 def indent s s.to_s.split(/\n/).map{|line| @indent + line}.join("\n") end |
#parenthesize(exp) ⇒ Object
Wrap appropriate expressions in matching parens.
1211 1212 1213 1214 1215 1216 1217 1218 |
# File 'lib/ruby2ruby.rb', line 1211 def parenthesize exp case self.context[1] when nil, :defn, :defs, :class, :sclass, :if, :iter, :resbody, :when, :while then exp else "(#{exp})" end end |
#process_alias(exp) ⇒ Object
Processors
97 98 99 100 101 |
# File 'lib/ruby2ruby.rb', line 97 def process_alias exp # :nodoc: _, lhs, rhs = exp parenthesize "alias #{process lhs} #{process rhs}" end |
#process_and(exp) ⇒ Object
:nodoc:
103 104 105 106 107 |
# File 'lib/ruby2ruby.rb', line 103 def process_and exp # :nodoc: _, lhs, rhs = exp parenthesize "#{process lhs} and #{process rhs}" end |
#process_arglist(exp) ⇒ Object
custom made node # :nodoc:
109 110 111 112 113 114 115 116 |
# File 'lib/ruby2ruby.rb', line 109 def process_arglist exp # custom made node # :nodoc: _, *args = exp args.map { |arg| code = process arg arg.sexp_type == :rescue ? "(#{code})" : code }.join ", " end |
#process_args(exp) ⇒ Object
:nodoc:
118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 |
# File 'lib/ruby2ruby.rb', line 118 def process_args exp # :nodoc: _, *args = exp args = args.map { |arg| case arg when Symbol then arg when Sexp then case arg.sexp_type when :lasgn then process(arg) when :masgn then process(arg) when :kwarg then _, k, v = arg "#{k}: #{process v}" else raise "unknown arg type #{arg.first.inspect}" end else raise "unknown arg type #{arg.inspect}" end } "(#{args.join ', '})" end |
#process_array(exp) ⇒ Object
:nodoc:
145 146 147 |
# File 'lib/ruby2ruby.rb', line 145 def process_array exp # :nodoc: "[#{process_arglist exp}]" end |
#process_attrasgn(exp) ⇒ Object
:nodoc:
149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 |
# File 'lib/ruby2ruby.rb', line 149 def process_attrasgn exp # :nodoc: _, recv, name, *args = exp rhs = args.pop args = s(:array, *args) receiver = process recv case name when :[]= then args = process args "#{receiver}#{args} = #{process rhs}" else raise "dunno what to do: #{args.inspect}" if args.size != 1 # s(:array) name = name.to_s.chomp "=" if rhs && rhs != s(:arglist) then "#{receiver}.#{name} = #{process(rhs)}" else raise "dunno what to do: #{rhs.inspect}" end end end |
#process_back_ref(exp) ⇒ Object
:nodoc:
171 172 173 174 175 |
# File 'lib/ruby2ruby.rb', line 171 def process_back_ref exp # :nodoc: _, n = exp "$#{n}" end |
#process_begin(exp) ⇒ Object
TODO: figure out how to do rescue and ensure ENTIRELY w/o begin
178 179 180 181 182 183 184 185 186 187 188 189 190 |
# File 'lib/ruby2ruby.rb', line 178 def process_begin exp # :nodoc: _, *rest = exp code = rest.map { |sexp| src = process sexp src = indent src unless src =~ /(^|\n)(rescue|ensure)/ # ensure no level 0 rescues src } code.unshift "begin" code.push "end" code.join "\n" end |
#process_block(exp) ⇒ Object
:nodoc:
192 193 194 195 196 197 198 199 200 201 202 203 204 |
# File 'lib/ruby2ruby.rb', line 192 def process_block exp # :nodoc: _, *body = exp result = body.map { |sexp| process sexp } result << "# do nothing\n" if result.empty? result = parenthesize result.join "\n" result += "\n" unless result.start_with? "(" result end |
#process_block_pass(exp) ⇒ Object
:nodoc:
206 207 208 209 210 211 212 |
# File 'lib/ruby2ruby.rb', line 206 def process_block_pass exp # :nodoc: raise "huh?: #{exp.inspect}" if exp.size > 2 _, sexp = exp "&#{process sexp}" end |
#process_break(exp) ⇒ Object
:nodoc:
214 215 216 217 218 219 220 221 222 223 224 |
# File 'lib/ruby2ruby.rb', line 214 def process_break exp # :nodoc: _, arg = exp val = process arg if val then "break #{val}" else "break" end end |
#process_call(exp, safe_call = false) ⇒ Object
:nodoc:
226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 |
# File 'lib/ruby2ruby.rb', line 226 def process_call(exp, safe_call = false) # :nodoc: _, recv, name, *args = exp receiver_node_type = recv && recv.sexp_type receiver = process recv receiver = "(#{receiver})" if ASSIGN_NODES.include? receiver_node_type # args = [] # this allows us to do both old and new sexp forms: # exp.push(*exp.pop[1..-1]) if exp.size == 1 && exp.first.first == :arglist @calls.push name in_context :arglist do max = args.size-1 args = args.map.with_index { |arg, i| arg_type = arg.sexp_type is_empty_hash = arg == s(:hash) arg = process arg next if arg.empty? strip_hash = (arg_type == :hash and not BINARY.include? name and not is_empty_hash and (i == max or args[i+1].sexp_type == :splat)) wrap_arg = Ruby2Ruby::ASSIGN_NODES.include? arg_type arg = arg[2..-3] if strip_hash arg = "(#{arg})" if wrap_arg arg }.compact end case name when *BINARY then if safe_call "#{receiver}&.#{name}(#{args.join(', ')})" elsif args.length > 1 "#{receiver}.#{name}(#{args.join(', ')})" else "(#{receiver} #{name} #{args.join(', ')})" end when :[] then receiver ||= "self" "#{receiver}[#{args.join(', ')}]" when :[]= then receiver ||= "self" rhs = args.pop "#{receiver}[#{args.join(', ')}] = #{rhs}" when :"!" then "(not #{receiver})" when :"-@" then "-#{receiver}" when :"+@" then "+#{receiver}" else args = nil if args.empty? args = "(#{args.join(', ')})" if args receiver = "#{receiver}." if receiver and not safe_call receiver = "#{receiver}&." if receiver and safe_call "#{receiver}#{name}#{args}" end ensure @calls.pop end |
#process_case(exp) ⇒ Object
:nodoc:
300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 |
# File 'lib/ruby2ruby.rb', line 300 def process_case exp # :nodoc: _, expr, *rest = exp result = [] expr = process expr if expr then result << "case #{expr}" else result << "case" end result.concat rest.map { |pt| if pt and pt.sexp_type == :when "#{process pt}" else code = indent process pt code = indent("# do nothing") if code =~ /^\s*$/ "else\n#{code}" end } result << "end" result.join "\n" end |
#process_cdecl(exp) ⇒ Object
:nodoc:
328 329 330 331 332 333 334 335 336 337 |
# File 'lib/ruby2ruby.rb', line 328 def process_cdecl exp # :nodoc: _, lhs, rhs = exp lhs = process lhs if Sexp === lhs if rhs then rhs = process rhs "#{lhs} = #{rhs}" else lhs.to_s end end |
#process_class(exp) ⇒ Object
:nodoc:
339 340 341 |
# File 'lib/ruby2ruby.rb', line 339 def process_class exp # :nodoc: "#{exp.comments}class #{util_module_or_class(exp, true)}" end |
#process_colon2(exp) ⇒ Object
:nodoc:
343 344 345 346 347 |
# File 'lib/ruby2ruby.rb', line 343 def process_colon2 exp # :nodoc: _, lhs, rhs = exp "#{process lhs}::#{rhs}" end |
#process_colon3(exp) ⇒ Object
:nodoc:
349 350 351 352 353 |
# File 'lib/ruby2ruby.rb', line 349 def process_colon3 exp # :nodoc: _, rhs = exp "::#{rhs}" end |
#process_const(exp) ⇒ Object
:nodoc:
355 356 357 358 359 |
# File 'lib/ruby2ruby.rb', line 355 def process_const exp # :nodoc: _, name = exp name.to_s end |
#process_cvar(exp) ⇒ Object
:nodoc:
361 362 363 364 365 |
# File 'lib/ruby2ruby.rb', line 361 def process_cvar exp # :nodoc: _, name = exp name.to_s end |
#process_cvasgn(exp) ⇒ Object
:nodoc:
367 368 369 370 371 |
# File 'lib/ruby2ruby.rb', line 367 def process_cvasgn exp # :nodoc: _, lhs, rhs = exp "#{lhs} = #{process rhs}" end |
#process_cvdecl(exp) ⇒ Object
:nodoc:
373 374 375 376 377 |
# File 'lib/ruby2ruby.rb', line 373 def process_cvdecl exp # :nodoc: _, lhs, rhs = exp "#{lhs} = #{process rhs}" end |
#process_defined(exp) ⇒ Object
:nodoc:
379 380 381 382 |
# File 'lib/ruby2ruby.rb', line 379 def process_defined exp # :nodoc: _, rhs = exp "defined? #{process rhs}" end |
#process_defn(exp) ⇒ Object
:nodoc:
384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 |
# File 'lib/ruby2ruby.rb', line 384 def process_defn(exp) # :nodoc: _, name, args, *body = exp comm = exp.comments args = process args args = "" if args == "()" body = s() if body == s(s(:nil)) # empty it out of a default nil expression # s(:defn, name, args, ivar|iasgn) case exp when s{ s(:defn, atom, t(:args), s(:ivar, atom)) } then # TODO: atom -> _ _, ivar = body.first ivar = ivar.to_s[1..-1] # remove leading @ reader = name.to_s return "attr_reader #{name.inspect}" if reader == ivar when s{ s(:defn, atom, t(:args), s(:iasgn, atom, s(:lvar, atom))) } then _, ivar, _val = body.first ivar = ivar.to_s[1..-1] # remove leading @ reader = name.to_s.chomp "=" return "attr_writer :#{reader}" if reader == ivar end body = body.map { |ssexp| process ssexp } simple = body.size <= 1 body << "# do nothing" if body.empty? body = body.join("\n") body = body.lines.to_a[1..-2].join("\n") if simple && body =~ /^\Abegin/ && body =~ /^end\z/ body = indent(body) unless simple && body =~ /(^|\n)rescue/ return "#{comm}def #{name}#{args}\n#{body}\nend".gsub(/\n\s*\n+/, "\n") end |
#process_defs(exp) ⇒ Object
:nodoc:
422 423 424 425 426 427 428 429 430 431 432 |
# File 'lib/ruby2ruby.rb', line 422 def process_defs exp # :nodoc: _, lhs, name, args, *body = exp var = [:self, :cvar, :dvar, :ivar, :gvar, :lvar].include? lhs.sexp_type lhs = process lhs lhs = "(#{lhs})" unless var name = "#{lhs}.#{name}" process_defn s(:defn, name, args, *body) end |
#process_dot2(exp) ⇒ Object
:nodoc:
434 435 436 437 438 |
# File 'lib/ruby2ruby.rb', line 434 def process_dot2(exp) # :nodoc: _, lhs, rhs = exp "(#{process lhs}..#{process rhs})" end |
#process_dot3(exp) ⇒ Object
:nodoc:
440 441 442 443 444 |
# File 'lib/ruby2ruby.rb', line 440 def process_dot3(exp) # :nodoc: _, lhs, rhs = exp "(#{process lhs}...#{process rhs})" end |
#process_dregx(exp) ⇒ Object
:nodoc:
446 447 448 449 450 451 452 |
# File 'lib/ruby2ruby.rb', line 446 def process_dregx exp # :nodoc: _, str, *rest = exp = re_opt rest.pop if Integer === rest.last "/" << util_dthing(:dregx, s(:dregx, str, *rest)) << "/#{}" end |
#process_dregx_once(exp) ⇒ Object
:nodoc:
454 455 456 |
# File 'lib/ruby2ruby.rb', line 454 def process_dregx_once(exp) # :nodoc: process_dregx(exp) + "o" end |
#process_dstr(exp) ⇒ Object
:nodoc:
458 459 460 |
# File 'lib/ruby2ruby.rb', line 458 def process_dstr(exp) # :nodoc: "\"#{util_dthing(:dstr, exp)}\"" end |
#process_dsym(exp) ⇒ Object
:nodoc:
462 463 464 |
# File 'lib/ruby2ruby.rb', line 462 def process_dsym(exp) # :nodoc: ":\"#{util_dthing(:dsym, exp)}\"" end |
#process_dxstr(exp) ⇒ Object
:nodoc:
466 467 468 |
# File 'lib/ruby2ruby.rb', line 466 def process_dxstr(exp) # :nodoc: "`#{util_dthing(:dxstr, exp)}`" end |
#process_ensure(exp) ⇒ Object
:nodoc:
470 471 472 473 474 475 476 477 478 479 480 481 482 |
# File 'lib/ruby2ruby.rb', line 470 def process_ensure(exp) # :nodoc: _, body, ens = exp body = process body ens = nil if ens == s(:nil) ens = process(ens) || "# do nothing" ens = "begin\n#{ens}\nend\n" if ens =~ /(^|\n)rescue/ body.sub!(/\n\s*end\z/, '') body = indent(body) unless body =~ /(^|\n)rescue/ return "#{body}\nensure\n#{indent ens}" end |
#process_evstr(exp) ⇒ Object
:nodoc:
484 485 486 487 488 |
# File 'lib/ruby2ruby.rb', line 484 def process_evstr exp # :nodoc: _, x = exp x ? process(x) : "" end |
#process_false(exp) ⇒ Object
:nodoc:
490 491 492 |
# File 'lib/ruby2ruby.rb', line 490 def process_false exp # :nodoc: "false" end |
#process_flip2(exp) ⇒ Object
:nodoc:
494 495 496 497 498 |
# File 'lib/ruby2ruby.rb', line 494 def process_flip2 exp # :nodoc: _, lhs, rhs = exp "#{process lhs}..#{process rhs}" end |
#process_flip3(exp) ⇒ Object
:nodoc:
500 501 502 503 504 |
# File 'lib/ruby2ruby.rb', line 500 def process_flip3 exp # :nodoc: _, lhs, rhs = exp "#{process lhs}...#{process rhs}" end |
#process_for(exp) ⇒ Object
:nodoc:
506 507 508 509 510 511 512 513 514 515 516 517 518 |
# File 'lib/ruby2ruby.rb', line 506 def process_for exp # :nodoc: _, recv, iter, body = exp recv = process recv iter = process iter body = process(body) || "# do nothing" result = ["for #{iter} in #{recv} do"] result << indent(body) result << "end" result.join "\n" end |
#process_gasgn(exp) ⇒ Object
:nodoc:
520 521 522 |
# File 'lib/ruby2ruby.rb', line 520 def process_gasgn exp # :nodoc: process_iasgn exp end |
#process_gvar(exp) ⇒ Object
:nodoc:
524 525 526 527 528 |
# File 'lib/ruby2ruby.rb', line 524 def process_gvar exp # :nodoc: _, name = exp name.to_s end |
#process_hash(exp) ⇒ Object
:nodoc:
530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 |
# File 'lib/ruby2ruby.rb', line 530 def process_hash(exp) # :nodoc: _, *pairs = exp result = [] result = pairs.each_slice(2).map { |k, v| if k.sexp_type == :kwsplat then "%s" % process(k) else t = v.sexp_type lhs = process k rhs = process v rhs = "(#{rhs})" unless HASH_VAL_NO_PAREN.include? t "%s => %s" % [lhs, rhs] end } return result.empty? ? "{}" : "{ #{result.join(', ')} }" end |
#process_iasgn(exp) ⇒ Object
:nodoc:
552 553 554 555 556 557 558 559 560 |
# File 'lib/ruby2ruby.rb', line 552 def process_iasgn(exp) # :nodoc: _, lhs, rhs = exp if rhs then "#{lhs} = #{process rhs}" else # part of an masgn lhs.to_s end end |
#process_if(exp) ⇒ Object
:nodoc:
562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 |
# File 'lib/ruby2ruby.rb', line 562 def process_if(exp) # :nodoc: _, c, t, f = exp = Ruby2Ruby::ASSIGN_NODES.include? c.sexp_type c = process c t = process t f = process f c = "(#{c.chomp})" if c =~ /\n/ if t then unless then if f then r = "#{c} ? (#{t}) : (#{f})" r = nil if r =~ /return/ # HACK - need contextual awareness or something else r = "#{t} if #{c}" end return r if r and (@indent+r).size < LINE_LENGTH and r !~ /\n/ end r = "if #{c} then\n#{indent(t)}\n" r << "else\n#{indent(f)}\n" if f r << "end" r elsif f unless then r = "#{f} unless #{c}" return r if (@indent+r).size < LINE_LENGTH and r !~ /\n/ end "unless #{c} then\n#{indent(f)}\nend" else # empty if statement, just do it in case of side effects from condition "if #{c} then\n#{indent '# do nothing'}\nend" end end |
#process_iter(exp) ⇒ Object
:nodoc:
600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 |
# File 'lib/ruby2ruby.rb', line 600 def process_iter(exp) # :nodoc: _, iter, args, body = exp iter = process iter body = process body if body args = case args when 0 then "" else " |#{process(args)[1..-2]}|" end b, e = if iter == "END" then [ "{", "}" ] else [ "do", "end" ] end iter.sub!(/\(\)$/, '') # REFACTOR: ugh result = [] result << "#{iter} {" result << args if body then result << " #{body.strip} " else result << ' ' end result << "}" result = result.join return result if result !~ /\n/ and result.size < LINE_LENGTH result = [] result << "#{iter} #{b}" result << args result << "\n" if body then result << indent(body.strip) result << "\n" end result << e result.join end |
#process_ivar(exp) ⇒ Object
:nodoc:
646 647 648 649 |
# File 'lib/ruby2ruby.rb', line 646 def process_ivar(exp) # :nodoc: _, name = exp name.to_s end |
#process_kwsplat(exp) ⇒ Object
651 652 653 654 |
# File 'lib/ruby2ruby.rb', line 651 def process_kwsplat(exp) _, kw = exp "**#{process kw}" end |
#process_lasgn(exp) ⇒ Object
:nodoc:
656 657 658 659 660 661 662 |
# File 'lib/ruby2ruby.rb', line 656 def process_lasgn(exp) # :nodoc: _, name, value = exp s = "#{name}" s += " = #{process value}" if value s end |
#process_lit(exp) ⇒ Object
:nodoc:
664 665 666 667 668 669 670 671 672 |
# File 'lib/ruby2ruby.rb', line 664 def process_lit exp # :nodoc: _, obj = exp case obj when Range then "(#{obj.inspect})" else obj.inspect end end |
#process_lvar(exp) ⇒ Object
:nodoc:
674 675 676 677 |
# File 'lib/ruby2ruby.rb', line 674 def process_lvar(exp) # :nodoc: _, name = exp name.to_s end |
#process_masgn(exp) ⇒ Object
:nodoc:
679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 |
# File 'lib/ruby2ruby.rb', line 679 def process_masgn(exp) # :nodoc: _, (type, *), * = exp # ugly, but STRICT_SEXP=1+ requires this if type == :array then _, lhs, rhs = exp case exp.length when 3 then # a, b = c, d lhs = lhs.sexp_body.map { |e| process e } rhs = case rhs && rhs.sexp_type when :array then # a, b = [c, d] process(rhs)[1..-2] else # a, b = c process rhs end "%s = %s" % [lhs.join(", "), rhs] when 2 then # a, (b, c) = ... "(%s)" % [process(lhs)[1..-2]] else raise "unknown masgn length: %p" % [exp] end else # a { |(b, c)| ... } lhs = exp.sexp_body.map { |e| case e when Symbol then e when Sexp then process e else raise "unknown masgn type: %p" % [e] end } "(%s)" % [lhs.join(", ")] end end |
#process_match(exp) ⇒ Object
:nodoc:
719 720 721 722 723 |
# File 'lib/ruby2ruby.rb', line 719 def process_match exp # :nodoc: _, rhs = exp "#{process rhs}" end |
#process_match2(exp) ⇒ Object
:nodoc:
725 726 727 728 729 730 731 732 733 |
# File 'lib/ruby2ruby.rb', line 725 def process_match2 exp # :nodoc: # s(:match2, s(:lit, /x/), s(:str, "blah")) _, lhs, rhs = exp lhs = process lhs rhs = process rhs "#{lhs} =~ #{rhs}" end |
#process_match3(exp) ⇒ Object
:nodoc:
735 736 737 738 739 740 741 742 743 744 745 746 747 |
# File 'lib/ruby2ruby.rb', line 735 def process_match3 exp # :nodoc: _, rhs, lhs = exp # yes, backwards left_type = lhs.sexp_type lhs = process lhs rhs = process rhs if ASSIGN_NODES.include? left_type then "(#{lhs}) =~ #{rhs}" else "#{lhs} =~ #{rhs}" end end |
#process_module(exp) ⇒ Object
:nodoc:
749 750 751 |
# File 'lib/ruby2ruby.rb', line 749 def process_module(exp) # :nodoc: "#{exp.comments}module #{util_module_or_class(exp)}" end |
#process_next(exp) ⇒ Object
:nodoc:
753 754 755 756 757 758 759 760 761 762 |
# File 'lib/ruby2ruby.rb', line 753 def process_next(exp) # :nodoc: _, rhs = exp val = rhs && process(rhs) # maybe push down into if and test rhs? if val then "next #{val}" else "next" end end |
#process_nil(exp) ⇒ Object
:nodoc:
764 765 766 |
# File 'lib/ruby2ruby.rb', line 764 def process_nil(exp) # :nodoc: "nil" end |
#process_not(exp) ⇒ Object
:nodoc:
768 769 770 771 |
# File 'lib/ruby2ruby.rb', line 768 def process_not(exp) # :nodoc: _, sexp = exp "(not #{process sexp})" end |
#process_nth_ref(exp) ⇒ Object
:nodoc:
773 774 775 776 |
# File 'lib/ruby2ruby.rb', line 773 def process_nth_ref(exp) # :nodoc: _, n = exp "$#{n}" end |
#process_op_asgn(exp) ⇒ Object
:nodoc:
778 779 780 781 782 783 784 785 786 |
# File 'lib/ruby2ruby.rb', line 778 def process_op_asgn exp # :nodoc: # [[:lvar, :x], [:call, nil, :z, [:lit, 1]], :y, :"||"] _, lhs, rhs, index, op = exp lhs = process lhs rhs = process rhs "#{lhs}.#{index} #{op}= #{rhs}" end |
#process_op_asgn1(exp) ⇒ Object
:nodoc:
788 789 790 791 792 793 794 795 796 797 |
# File 'lib/ruby2ruby.rb', line 788 def process_op_asgn1(exp) # :nodoc: # [[:lvar, :b], [:arglist, [:lit, 1]], :"||", [:lit, 10]] _, lhs, index, msg, rhs = exp lhs = process lhs index = process index rhs = process rhs "#{lhs}[#{index}] #{msg}= #{rhs}" end |
#process_op_asgn2(exp) ⇒ Object
:nodoc:
799 800 801 802 803 804 805 806 807 808 |
# File 'lib/ruby2ruby.rb', line 799 def process_op_asgn2 exp # :nodoc: # [[:lvar, :c], :var=, :"||", [:lit, 20]] _, lhs, index, msg, rhs = exp lhs = process lhs index = index.to_s[0..-2] rhs = process rhs "#{lhs}.#{index} #{msg}= #{rhs}" end |
#process_op_asgn_and(exp) ⇒ Object
:nodoc:
810 811 812 813 814 815 |
# File 'lib/ruby2ruby.rb', line 810 def process_op_asgn_and(exp) # :nodoc: # a &&= 1 # [[:lvar, :a], [:lasgn, :a, [:lit, 1]]] _, _lhs, rhs = exp process(rhs).sub(/\=/, '&&=') end |
#process_op_asgn_or(exp) ⇒ Object
:nodoc:
817 818 819 820 821 822 |
# File 'lib/ruby2ruby.rb', line 817 def process_op_asgn_or(exp) # :nodoc: # a ||= 1 # [[:lvar, :a], [:lasgn, :a, [:lit, 1]]] _, _lhs, rhs = exp process(rhs).sub(/\=/, '||=') end |
#process_or(exp) ⇒ Object
:nodoc:
824 825 826 827 828 |
# File 'lib/ruby2ruby.rb', line 824 def process_or(exp) # :nodoc: _, lhs, rhs = exp "(#{process lhs} or #{process rhs})" end |
#process_postexe(exp) ⇒ Object
:nodoc:
830 831 832 |
# File 'lib/ruby2ruby.rb', line 830 def process_postexe(exp) # :nodoc: "END" end |
#process_redo(exp) ⇒ Object
:nodoc:
834 835 836 |
# File 'lib/ruby2ruby.rb', line 834 def process_redo(exp) # :nodoc: "redo" end |
#process_resbody(exp) ⇒ Object
:nodoc:
838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 |
# File 'lib/ruby2ruby.rb', line 838 def process_resbody exp # :nodoc: # s(:resbody, s(:array), s(:return, s(:str, "a"))) _, args, *body = exp body = body.compact.map { |sexp| process sexp } body << "# do nothing" if body.empty? name = args.lasgn true name ||= args.iasgn true args = process(args)[1..-2] args = " #{args}" unless args.empty? args += " => #{name[1]}" if name "rescue#{args}\n#{indent body.join("\n")}" end |
#process_rescue(exp) ⇒ Object
:nodoc:
857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 |
# File 'lib/ruby2ruby.rb', line 857 def process_rescue exp # :nodoc: _, *rest = exp exp = nil body = process rest.shift unless rest.first.sexp_type == :resbody els = process rest.pop unless rest.last && rest.last.sexp_type == :resbody body ||= "# do nothing" # TODO: I don't like this using method_missing, but I need to ensure tests simple = rest.size == 1 && rest.first.size <= 3 && !rest.first.block && !rest.first.return resbodies = rest.map { |resbody| _, rb_args, rb_body, *rb_rest = resbody simple &&= rb_args == s(:array) simple &&= rb_rest.empty? && rb_body && rb_body.node_type != :block process resbody } if els then "#{indent body}\n#{resbodies.join("\n")}\nelse\n#{indent els}" elsif simple then resbody = resbodies.first.sub(/\n\s*/, ' ') "#{body} #{resbody}" else "#{indent body}\n#{resbodies.join("\n")}" end end |
#process_retry(exp) ⇒ Object
:nodoc:
888 889 890 |
# File 'lib/ruby2ruby.rb', line 888 def process_retry(exp) # :nodoc: "retry" end |
#process_return(exp) ⇒ Object
:nodoc:
892 893 894 895 896 897 898 899 900 901 902 903 |
# File 'lib/ruby2ruby.rb', line 892 def process_return exp # :nodoc: _, rhs = exp unless rhs then "return" else rhs_type = rhs.sexp_type rhs = process rhs rhs = "(#{rhs})" if ASSIGN_NODES.include? rhs_type "return #{rhs}" end end |
#process_safe_attrasgn(exp) ⇒ Object
:nodoc:
905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 |
# File 'lib/ruby2ruby.rb', line 905 def process_safe_attrasgn exp # :nodoc: _, receiver, name, *rest = exp receiver = process receiver rhs = rest.pop args = rest.pop # should be nil raise "dunno what to do: #{args.inspect}" if args name = name.to_s.sub(/=$/, '') if rhs && rhs != s(:arglist) then "#{receiver}&.#{name} = #{process rhs}" else raise "dunno what to do: #{rhs.inspect}" end end |
#process_safe_call(exp) ⇒ Object
:nodoc:
296 297 298 |
# File 'lib/ruby2ruby.rb', line 296 def process_safe_call exp # :nodoc: process_call exp, :safe end |
#process_safe_op_asgn(exp) ⇒ Object
:nodoc:
923 924 925 926 927 928 929 930 931 |
# File 'lib/ruby2ruby.rb', line 923 def process_safe_op_asgn exp # :nodoc: # [[:lvar, :x], [:call, nil, :z, [:lit, 1]], :y, :"||"] _, lhs, rhs, index, op = exp lhs = process lhs rhs = process rhs "#{lhs}&.#{index} #{op}= #{rhs}" end |
#process_safe_op_asgn2(exp) ⇒ Object
:nodoc:
933 934 935 936 937 938 939 940 941 942 943 |
# File 'lib/ruby2ruby.rb', line 933 def process_safe_op_asgn2(exp) # :nodoc: # [[:lvar, :c], :var=, :"||", [:lit, 20]] _, lhs, index, msg, rhs = exp lhs = process lhs index = index.to_s[0..-2] rhs = process rhs "#{lhs}&.#{index} #{msg}= #{rhs}" end |
#process_sclass(exp) ⇒ Object
:nodoc:
945 946 947 948 949 950 951 952 |
# File 'lib/ruby2ruby.rb', line 945 def process_sclass(exp) # :nodoc: _, recv, *block = exp recv = process recv block = indent process_block s(:block, *block) "class << #{recv}\n#{block}\nend" end |
#process_self(exp) ⇒ Object
:nodoc:
954 955 956 |
# File 'lib/ruby2ruby.rb', line 954 def process_self(exp) # :nodoc: "self" end |
#process_splat(exp) ⇒ Object
:nodoc:
958 959 960 961 962 963 964 965 |
# File 'lib/ruby2ruby.rb', line 958 def process_splat(exp) # :nodoc: _, arg = exp if arg.nil? then "*" else "*#{process arg}" end end |
#process_str(exp) ⇒ Object
:nodoc:
967 968 969 970 |
# File 'lib/ruby2ruby.rb', line 967 def process_str(exp) # :nodoc: _, s = exp s.dump end |
#process_super(exp) ⇒ Object
:nodoc:
972 973 974 975 976 977 978 979 980 |
# File 'lib/ruby2ruby.rb', line 972 def process_super(exp) # :nodoc: _, *args = exp args = args.map { |arg| process arg } "super(#{args.join ", "})" end |
#process_svalue(exp) ⇒ Object
:nodoc:
982 983 984 985 986 987 988 |
# File 'lib/ruby2ruby.rb', line 982 def process_svalue(exp) # :nodoc: _, *args = exp args.map { |arg| process arg }.join ", " end |
#process_to_ary(exp) ⇒ Object
:nodoc:
990 991 992 993 994 |
# File 'lib/ruby2ruby.rb', line 990 def process_to_ary exp # :nodoc: _, sexp = exp process sexp end |
#process_true(exp) ⇒ Object
:nodoc:
996 997 998 |
# File 'lib/ruby2ruby.rb', line 996 def process_true(exp) # :nodoc: "true" end |
#process_undef(exp) ⇒ Object
:nodoc:
1000 1001 1002 1003 1004 |
# File 'lib/ruby2ruby.rb', line 1000 def process_undef(exp) # :nodoc: _, name = exp "undef #{process name}" end |
#process_until(exp) ⇒ Object
:nodoc:
1006 1007 1008 |
# File 'lib/ruby2ruby.rb', line 1006 def process_until(exp) # :nodoc: cond_loop(exp, 'until') end |
#process_valias(exp) ⇒ Object
:nodoc:
1010 1011 1012 1013 1014 |
# File 'lib/ruby2ruby.rb', line 1010 def process_valias exp # :nodoc: _, lhs, rhs = exp "alias #{lhs} #{rhs}" end |
#process_when(exp) ⇒ Object
:nodoc:
1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 |
# File 'lib/ruby2ruby.rb', line 1016 def process_when exp # :nodoc: s(:when, s(:array, s(:lit, 1)), s(:call, nil, :puts, s(:str, "something")), s(:lasgn, :result, s(:str, "red"))) _, lhs, *rhs = exp cond = process(lhs)[1..-2] rhs = rhs.compact.map { |sexp| indent process sexp } rhs << indent("# do nothing") if rhs.empty? rhs = rhs.join "\n" "when #{cond} then\n#{rhs.chomp}" end |
#process_while(exp) ⇒ Object
:nodoc:
1035 1036 1037 |
# File 'lib/ruby2ruby.rb', line 1035 def process_while(exp) # :nodoc: cond_loop exp, "while" end |
#process_xstr(exp) ⇒ Object
:nodoc:
1039 1040 1041 |
# File 'lib/ruby2ruby.rb', line 1039 def process_xstr(exp) # :nodoc: "`#{process_str(exp)[1..-2]}`" end |
#process_yield(exp) ⇒ Object
:nodoc:
1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 |
# File 'lib/ruby2ruby.rb', line 1043 def process_yield(exp) # :nodoc: _, *args = exp args = args.map { |arg| process arg } unless args.empty? then "yield(#{args.join(', ')})" else "yield" end end |
#process_zsuper(exp) ⇒ Object
:nodoc:
1057 1058 1059 |
# File 'lib/ruby2ruby.rb', line 1057 def process_zsuper(exp) # :nodoc: "super" end |
#re_opt(options) ⇒ Object
Return the appropriate regexp flags for a given numeric code.
1223 1224 1225 1226 1227 |
# File 'lib/ruby2ruby.rb', line 1223 def re_opt bits = (0..8).map { |n| [n] * 2**n } bits.delete 0 bits.map { |n| Regexp::CODES[n] }.join end |
#rewrite_attrasgn(exp) ⇒ Object
Rewriters:
1064 1065 1066 1067 1068 1069 1070 1071 1072 |
# File 'lib/ruby2ruby.rb', line 1064 def rewrite_attrasgn exp # :nodoc: if context.first(2) == [:array, :masgn] then _, recv, msg, *args = exp exp = s(:call, recv, msg.to_s.chomp("=").to_sym, *args) end exp end |
#rewrite_call(exp) ⇒ Object
:nodoc:
1074 1075 1076 1077 1078 1079 1080 |
# File 'lib/ruby2ruby.rb', line 1074 def rewrite_call exp # :nodoc: _, recv, msg, *args = exp exp = s(:not, recv) if msg == :! && args.empty? exp end |
#rewrite_ensure(exp) ⇒ Object
:nodoc:
1082 1083 1084 1085 |
# File 'lib/ruby2ruby.rb', line 1082 def rewrite_ensure exp # :nodoc: exp = s(:begin, exp) unless context.first == :begin exp end |
#rewrite_if(exp) ⇒ Object
:nodoc:
1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 |
# File 'lib/ruby2ruby.rb', line 1087 def rewrite_if exp # :nodoc: _, c, t, f = exp if c.sexp_type == :not then _, nc = c exp = s(:if, nc, f, t) end exp end |
#rewrite_resbody(exp) ⇒ Object
:nodoc:
1098 1099 1100 1101 1102 1103 1104 |
# File 'lib/ruby2ruby.rb', line 1098 def rewrite_resbody exp # :nodoc: _, args, *_rest = exp raise "no exception list in #{exp.inspect}" unless exp.size > 2 && args raise args.inspect if args.sexp_type != :array # for now, do nothing, just check and freak if we see an errant structure exp end |
#rewrite_rescue(exp) ⇒ Object
:nodoc:
1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 |
# File 'lib/ruby2ruby.rb', line 1106 def rewrite_rescue exp # :nodoc: complex = false complex ||= exp.size > 3 complex ||= exp.resbody.block complex ||= exp.resbody.size > 3 resbodies = exp.find_nodes(:resbody) complex ||= resbodies.any? { |n| n[1] != s(:array) } complex ||= resbodies.any? { |n| n.last.nil? } complex ||= resbodies.any? { |(_, _, body)| body and body.node_type == :block } handled = context.first == :ensure exp = s(:begin, exp) if complex unless handled exp end |
#rewrite_svalue(exp) ⇒ Object
:nodoc:
1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 |
# File 'lib/ruby2ruby.rb', line 1123 def rewrite_svalue(exp) # :nodoc: case exp.last.sexp_type when :array s(:svalue, *exp[1].sexp_body) when :splat exp else raise "huh: #{exp.inspect}" end end |
#rewrite_until(exp) ⇒ Object
:nodoc:
1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 |
# File 'lib/ruby2ruby.rb', line 1134 def rewrite_until exp # :nodoc: _, c, *body = exp if c.sexp_type == :not then _, nc = c exp = s(:while, nc, *body) end exp end |
#rewrite_while(exp) ⇒ Object
:nodoc:
1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 |
# File 'lib/ruby2ruby.rb', line 1145 def rewrite_while exp # :nodoc: _, c, *body = exp if c.sexp_type == :not then _, nc = c exp = s(:until, nc, *body) end exp end |
#splat(sym) ⇒ Object
Return a splatted symbol for sym
.
1232 1233 1234 |
# File 'lib/ruby2ruby.rb', line 1232 def splat(sym) :"*#{sym}" end |
#util_dthing(type, exp) ⇒ Object
Utility method to generate something interpolated.
1239 1240 1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251 1252 1253 1254 1255 1256 1257 1258 1259 1260 1261 1262 |
# File 'lib/ruby2ruby.rb', line 1239 def util_dthing(type, exp) _, str, *rest = exp # first item in sexp is a string literal str = dthing_escape(type, str) rest = rest.map { |pt| case pt when Sexp then # TODO: what the fuck? why?? case pt.sexp_type when :str then dthing_escape(type, pt.last) when :evstr then '#{%s}' % [process(pt)] else raise "unknown type: #{pt.inspect}" end else raise "unhandled value in d-thing: #{pt.inspect}" end } [str, rest].join end |
#util_module_or_class(exp, is_class = false) ⇒ Object
Utility method to generate ether a module or class.
1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 |
# File 'lib/ruby2ruby.rb', line 1267 def util_module_or_class(exp, is_class=false) result = [] _, name, *body = exp superk = body.shift if is_class name = process name if Sexp === name result << name if superk then superk = process superk result << " < #{superk}" if superk end result << "\n" body = body.map { |sexp| process(sexp).chomp } unless body.empty? then body = indent(body.join("\n\n")) + "\n" else body = "" end result << body result << "end" result.join end |