Class: Stupidedi::Builder::InterchangeState

Inherits:
AbstractState show all
Defined in:
lib/stupidedi/builder/states/interchange_state.rb

Instance Attribute Summary collapse

Constructors collapse

Instance Method Summary collapse

Methods inherited from AbstractState

#leaf?, lsequence, mkcomposite, mkelement, mkrepeated, mksegment, mksimple, #pretty_print, sequence, tsequence

Methods included from Inspect

#inspect

Constructor Details

#initialize(separators, segment_dict, instructions, zipper, children) ⇒ InterchangeState

Returns a new instance of InterchangeState.



21
22
23
24
 
# File 'lib/stupidedi/builder/states/interchange_state.rb', line 21

def initialize(separators, segment_dict, instructions, zipper, children)
  @separators, @segment_dict, @instructions, @zipper, @children =
    separators, segment_dict, instructions, zipper, children
end

Instance Attribute Details

#children ⇒ Array<AbstractState> (readonly)

Returns:



19
20
21
 
# File 'lib/stupidedi/builder/states/interchange_state.rb', line 19

def children
  @children
end

#instructions ⇒ InstructionTable (readonly)

Returns:



13
14
15
 
# File 'lib/stupidedi/builder/states/interchange_state.rb', line 13

def instructions
  @instructions
end

#segment_dict ⇒ Reader::SegmentDict (readonly)

Returns:



10
11
12
 
# File 'lib/stupidedi/builder/states/interchange_state.rb', line 10

def segment_dict
  @segment_dict
end

#separators ⇒ Reader::Separators (readonly)

Returns:



7
8
9
 
# File 'lib/stupidedi/builder/states/interchange_state.rb', line 7

def separators
  @separators
end

#zipper ⇒ Zipper::AbstractCursor (readonly)

Returns:



16
17
18
 
# File 'lib/stupidedi/builder/states/interchange_state.rb', line 16

def zipper
  @zipper
end

Class Method Details

.push(zipper, parent, segment_tok, segment_use, config) ⇒ Zipper::AbstractCursor

Returns:



42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
 
# File 'lib/stupidedi/builder/states/interchange_state.rb', line 42

def push(zipper, parent, segment_tok, segment_use, config)
  # ISA12: Interchange Control Version Number
  version = segment_tok.element_toks.at(11).try(:value)

  unless config.interchange.defined_at?(version)
    return FailureState.push(
      zipper,
      parent,
      segment_tok,
      "unknown interchange version #{version.inspect}")
  end

  # Construct a SegmentVal and InterchangeVal around it
  envelope_def = config.interchange.at(version)
  envelope_val = envelope_def.empty(parent.separators)
  segment_use  = envelope_def.entry_segment_use
  segment_val  = mksegment(segment_tok, segment_use)

  separators =
    parent.separators.merge(envelope_def.separators(segment_val))

  zipper.append_child new(
    separators,
    parent.segment_dict.push(envelope_val.segment_dict),
    parent.instructions.push(instructions(envelope_def)),
    parent.zipper.append(envelope_val).append_child(segment_val),
    [])
end

Instance Method Details

#copy(changes = {}) ⇒ InterchangeState

Returns:



27
28
29
30
31
32
33
34
 
# File 'lib/stupidedi/builder/states/interchange_state.rb', line 27

def copy(changes = {})
  InterchangeState.new \
    changes.fetch(:separators, @separators),
    changes.fetch(:segment_dict, @segment_dict),
    changes.fetch(:instructions, @instructions),
    changes.fetch(:zipper, @zipper),
    changes.fetch(:children, @children)
end