Difference between revisions of "NR.c"

From Organic Design wiki
m
(fix HL)
 
(12 intermediate revisions by the same user not shown)
Line 1: Line 1:
// Moves "this" to node's [[[[focus]]]] if exists then rotates [[[[loop]]]] and executes/reduces the focus item
+
<source lang="c">
 +
// Moves "this" to node's focus if exists then rotates loop and executes/reduces the focus item
 
void nodeReduce() {
 
void nodeReduce() {
if (this = listGetValue(loop = this)) {               // Move "this" to the [[[[focus]]]] in the node's [[[[current loop]]]]
+
    if(this = nodeLoopRotate(parent = this)) {       // Move "this" to the focus in the node's loop and rotate
listSetValue(loop,nodeGetValue(this,nodeNEXT));   // Rotate the loop
+
        nodeSetValue(this, nodePARENT, parent);       // Update the parent association
code *ptr = *nodeState(this,nodeCODE);           // [[[[nodeCODE]]]] value is a pointer-index
+
        if(code = *nodeState(this, nodeCODE)) code(); // nodeCODE value is a pointer-index, execute as function-reference if non-zero
ptr ? ptr() : nodeReduce();                      // Execute ptr if non-NULL, else [[[[reduce]]]] item
+
    }
}
+
}</source>
}
 

Latest revision as of 00:32, 26 May 2016

// Moves "this" to node's focus if exists then rotates loop and executes/reduces the focus item
void nodeReduce() {
    if(this = nodeLoopRotate(parent = this)) {        // Move "this" to the focus in the node's loop and rotate
        nodeSetValue(this, nodePARENT, parent);       // Update the parent association
        if(code = *nodeState(this, nodeCODE)) code(); // nodeCODE value is a pointer-index, execute as function-reference if non-zero
    }
}