Class: Elparser::SExpListDot

Inherits:

AbstractSExpCons

• Object
• AbstractSExp
• AbstractSExpCons
• Elparser::SExpListDot

Defined in:

lib/elparser.rb

Overview

(list . last)

Instance Method Summary

• #car ⇒ Object
• #cdr ⇒ Object
• #initialize(list, last) ⇒ SExpListDot constructor

  A new instance of SExpListDot.

• #list? ⇒ Boolean
• #to_ruby ⇒ Object
• #to_s ⇒ Object
• #visit(&block) ⇒ Object

Methods inherited from AbstractSExpCons

#cons?

Methods inherited from AbstractSExp

#==, #atom?, #cons?

Constructor Details

#initialize(list, last) ⇒ SExpListDot

Returns a new instance of SExpListDot.

# File 'lib/elparser.rb', line 183

def initialize(list, last)
  @list = list
  @last = last
end

Instance Method Details

#car ⇒ Object

# File 'lib/elparser.rb', line 187

def car
  @list[0]
end

#cdr ⇒ Object

# File 'lib/elparser.rb', line 190

def cdr
  if @list.size == 2 then
    SExpCons.new(@list[1], @last)
  else
    SExpListDot.new(@list.slice(1..-1),@last)
  end
end

#list? ⇒ Boolean

Returns:

• (Boolean)

# File 'lib/elparser.rb', line 197

def list?
  false
end

#to_ruby ⇒ Object

# File 'lib/elparser.rb', line 207

def to_ruby
  @list.map {|i| i.to_ruby}.push(@last.to_ruby)
end

#to_s ⇒ Object

# File 'lib/elparser.rb', line 200

def to_s
  "("+@list.map{|i| i.to_s }.join(" ") + " . #{@last.to_s})"
end

#visit(&block) ⇒ Object

# File 'lib/elparser.rb', line 203

def visit(&block)
  @list = @list.map(&block)
  @last = block.call(@last)
end