Class: Dhall::LetBlock

Inherits:

Expression

• Object
• Expression
• Dhall::LetBlock

Defined in:

lib/dhall/ast.rb,
lib/dhall/binary.rb,
lib/dhall/normalize.rb

Class Method Summary

• .decode(*parts) ⇒ Object
• .for(lets:, body:) ⇒ Object

Instance Method Summary

• #as_json ⇒ Object
• #desugar ⇒ Object
• #normalize ⇒ Object
• #shift(amount, name, min_index) ⇒ Object
• #unflatten ⇒ Object

Methods inherited from Expression

#&, #*, #+, #<<, #as_dhall, #cache_key, #call, #concat, #deep_merge, #deep_merge_type, #dhall_eq, #digest, #fetch, #fusion, #merge, #resolve, #slice, #substitute, #to_cbor, #to_proc, #|

Class Method Details

.decode(*parts) ⇒ Object

# File 'lib/dhall/binary.rb', line 206

def self.decode(*parts)
  body = Dhall.decode(parts.pop)
  lets = parts.each_slice(3).map do |(var, type, assign)|
    Let.new(
      var:    var,
      assign: Dhall.decode(assign),
      type:   type.nil? ? nil : Dhall.decode(type)
    )
  end

  self.for(lets: lets, body: body)
end

.for(lets:, body:) ⇒ Object

# File 'lib/dhall/ast.rb', line 1525

def self.for(lets:, body:)
  if lets.length == 1
    LetIn.new(let: lets.first, body: body)
  else
    new(lets: lets, body: body)
  end
end

Instance Method Details

#as_json ⇒ Object

# File 'lib/dhall/ast.rb', line 1544

def as_json
  [25, *lets.flat_map(&:as_json), body.as_json]
end

#desugar ⇒ Object

# File 'lib/dhall/ast.rb', line 1540

def desugar
  unflatten(&:desugar)
end

#normalize ⇒ Object

# File 'lib/dhall/normalize.rb', line 406

def normalize
  desugar.normalize
end

#shift(amount, name, min_index) ⇒ Object

# File 'lib/dhall/normalize.rb', line 410

def shift(amount, name, min_index)
  unflatten.shift(amount, name, min_index)
end

#unflatten ⇒ Object

# File 'lib/dhall/ast.rb', line 1533

def unflatten
  lets.reverse.reduce(body) do |inside, let|
    letin = LetIn.new(let: let, body: inside)
    block_given? ? (yield letin) : letin
  end
end