Class: Flor::Pro::Head

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

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, #pre_execute, #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

#receive ⇒ Object 



7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
# File 'lib/flor/pcore/_head.rb', line 7

def receive

  return execute_child(1) \
    if @message['point'] == 'execute'
      #
      # notice how it skips the first _sqs child

  h = [ tree[1][0][1], payload['ret'] ]
  h[1] = node_payload_ret if h[0].match(/\Af(ld|ield)?\.ret\z/)

  fail Flor::FlorError.new("don't know how to apply #{h[0].inspect}") \
    if h[1] == nil

  return execute_child(2, nil, '__head' => h) \
    if @message['from'].match(/_1\z/)

  super
end