Class: Flor::Pro::Case

Inherits:
Flor::Procedure show all
Defined in:
lib/flor/pcore/case.rb

Direct Known Subclasses

Match

Constant Summary

Constants inherited from Flor::Procedure

Flor::Procedure::RVARS, Flor::Procedure::TRUE_ATTS

Instance Attribute Summary

Attributes inherited from Node

#message

Instance Method Summary collapse

Methods inherited from Flor::Procedure

[], core?, #debug_msg, #debug_tree, #end, #flank, #heap, inherited, make, names, #prepare_on_receive_last, #trigger_on_error

Methods inherited from Node

#child_id, #cnodes, #cnodes_any?, #cnodes_empty?, #deref, #descendant_of?, #domain, #exid, #fei, #from, #h, #initialize, #lookup_tree, #lookup_value, #message_or_node_payload, #nid, #node_closed?, #node_ended?, #node_open?, #node_payload, #node_payload_ret, #node_status, #node_status_flavour, #on_error_parent, #parent, #payload, #payload_ret, #point, #reheap, #to_procedure_node, #tree

Constructor Details

This class inherits a constructor from Flor::Node

Instance Method Details

#pre_executeObject



136
137
138
139
140
141
# File 'lib/flor/pcore/case.rb', line 136

def pre_execute

  unatt_unkeyed_children

  @node['val'] = payload['ret'] if non_att_count.even?
end

#receiveObject



143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
# File 'lib/flor/pcore/case.rb', line 143

def receive

  return wrap_reply if @node['found']

  determine_fcid_and_ncid

  return execute_child(@ncid) if @fcid == nil

  has_no_val = ! @node.has_key?('val')

  if has_no_val && ! from_att?
    @node['val'] = payload['ret']
    execute_conditional
  elsif has_no_val
    execute_child(@ncid)
  elsif m = match?
    execute_then(@ncid, m)
  else
    execute_conditional(@ncid + 1)
  end
end