Class: Sexp2Ruby::Node::When

Inherits:
Base
  • Object
show all
Defined in:
lib/sexp2ruby/node/when.rb

Constant Summary

Constants inherited from Base

Base::ASSIGN_NODES, Base::LF, Base::LINE_LENGTH

Instance Attribute Summary

Attributes inherited from Base

#processor

Instance Method Summary collapse

Methods inherited from Base

#initialize

Constructor Details

This class inherits a constructor from Sexp2Ruby::Node::Base

Instance Method Details

#to_s(exp) ⇒ Object 



4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
# File 'lib/sexp2ruby/node/when.rb', line 4

def to_s(exp)
  src = []

  if self.context[1] == :array # ugh. matz! why not an argscat?!?
    val = process(exp.shift)
    exp.shift # empty body
    return "*#{val}"
  end

  until exp.empty?
    cond = process(exp.shift).to_s[1..-2]
    code = indent(finish(exp).join(LF))
    code = indent "# do nothing" if code =~ /\A\s*\Z/
    src << "when #{cond} then\n#{code.chomp}"
  end

  src.join(LF)
end