Class: Erlang::ETF::List

Inherits:
Object
  • Object
show all
Includes:
Term
Defined in:
lib/erlang/etf/list.rb

Overview

1 4
108 Length Elements Tail

Length is the number of elements that follows in the Elements section. Tail is the final tail of the list; it is NIL_EXT for a proper list, but may be anything type if the list is improper (for instance [a|b]).

(see LIST_EXT)

Constant Summary collapse

UINT32BE = 
Erlang::ETF::Term::UINT32BE

Constants included from Term

Term::ATOM_CACHE_REF, Term::ATOM_EXT, Term::ATOM_INTERNAL_REF2, Term::ATOM_INTERNAL_REF3, Term::ATOM_UTF8_EXT, Term::BINARY_ENCODING, Term::BINARY_EXT, Term::BINARY_INTERNAL_REF, Term::BIT_BINARY_EXT, Term::BIT_BINARY_INTERNAL_REF, Term::COMPRESSED, Term::DIST_HEADER, Term::DOUBLE, Term::DOUBLEBE, Term::DOUBLELE, Term::ERLANG_MAGIC_BYTE, Term::EXPORT_EXT, Term::FLOAT_EXT, Term::FUN_EXT, Term::INT128, Term::INT128BE, Term::INT128LE, Term::INT16, Term::INT16BE, Term::INT16LE, Term::INT32, Term::INT32BE, Term::INT32LE, Term::INT64, Term::INT64BE, Term::INT64LE, Term::INT8, Term::INTEGER_EXT, Term::LARGE_BIG_EXT, Term::LARGE_TUPLE_EXT, Term::LIST_EXT, Term::MAP_EXT, Term::NEW_FLOAT_EXT, Term::NEW_FUN_EXT, Term::NEW_REFERENCE_EXT, Term::NIL_EXT, Term::PID_EXT, Term::PORT_EXT, Term::REFERENCE_EXT, Term::SINGLE, Term::SINGLEBE, Term::SINGLELE, Term::SMALL_ATOM_EXT, Term::SMALL_ATOM_UTF8_EXT, Term::SMALL_BIG_EXT, Term::SMALL_INTEGER_EXT, Term::SMALL_TUPLE_EXT, Term::STRING_EXT, Term::UINT128, Term::UINT128BE, Term::UINT128LE, Term::UINT16, Term::UINT16BE, Term::UINT16LE, Term::UINT32, Term::UINT32LE, Term::UINT64, Term::UINT64BE, Term::UINT64LE, Term::UINT8

Class Method Summary collapse

Instance Method Summary collapse

Methods included from Term

#<=>, binary_encoding, #eql?, #erlang_external_type, #hash, included, #to_erlang_etf

Constructor Details

#initialize(term, elements = nil, tail = nil) ⇒ List

Returns a new instance of List.

Raises:

  • (ArgumentError) 


42
43
44
45
46
47
 
# File 'lib/erlang/etf/list.rb', line 42

def initialize(term, elements = nil, tail = nil)
  raise ArgumentError, "term must be of any type" if not Erlang.is_any(term)
  @term = term
  @elements = elements.freeze
  @tail = tail.freeze
end

Class Method Details

.[](term, elements = nil, tail = nil) ⇒ Object 



25
26
27
28
29
 
# File 'lib/erlang/etf/list.rb', line 25

def [](term, elements = nil, tail = nil)
  return term if term.kind_of?(Erlang::ETF::Term)
  term = Erlang.from(term)
  return new(term, elements, tail)
end

.erlang_load(buffer) ⇒ Object 



31
32
33
34
35
36
37
38
39
 
# File 'lib/erlang/etf/list.rb', line 31

def erlang_load(buffer)
  length, = buffer.read(4).unpack(UINT32BE)
  elements = Array.new(length)
  length.times { |i| elements[i] = Erlang::ETF.read_term(buffer) }
  tail = Erlang::ETF.read_term(buffer)
  return tail if length == 0
  list = Erlang::List.from_enum(elements) + tail
  return new(list, elements, tail)
end

Instance Method Details

#erlang_dump(buffer = ::String.new.force_encoding(BINARY_ENCODING)) ⇒ Object 



49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
 
# File 'lib/erlang/etf/list.rb', line 49

def erlang_dump(buffer = ::String.new.force_encoding(BINARY_ENCODING))
  buffer << LIST_EXT
  elements = nil
  tail = nil
  if not Erlang.is_list(term)
    elements = @elements || []
    tail = @tail || @term
  else
    elements = @elements || (@term.improper? ? @term.to_proper_list : @term)
    tail = @tail || (@term.improper? ? @term.last(true) : Erlang::Nil)
  end
  length = elements.size
  buffer << [length].pack(UINT32BE)
  elements.each { |element| Erlang::ETF.write_term(element, buffer) }
  Erlang::ETF.write_term(tail, buffer)
  return buffer
end

#inspect ⇒ Object 



67
68
69
70
71
72
73
 
# File 'lib/erlang/etf/list.rb', line 67

def inspect
  if @elements.nil? and @tail.nil?
    return super
  else
    return "#{self.class}[#{@term.inspect}, #{@elements.inspect}, #{@tail.inspect}]"
  end
end

#pretty_print(pp) ⇒ Object 



75
76
77
78
79
80
81
82
 
# File 'lib/erlang/etf/list.rb', line 75

def pretty_print(pp)
  state = [@term]
  state.push(@elements, @tail) if not @elements.nil? or not @tail.nil?
  return pp.group(1, "#{self.class}[", "]") do
    pp.breakable ''
    pp.seplist(state) { |obj| obj.pretty_print(pp) }
  end
end