Mercurial > repos > rhope

comparison backendutils.rhope @ 18:ea991f95ae1f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
C backend working well enough to generate Fib test
author Mike Pavone <pavone@retrodev.com>
date Wed, 27 May 2009 04:49:32 -0400
parents 23dd9c766699
children e9272f7ebd26
comparison
equal deleted inserted replaced
17:d05184970c1c 18:ea991f95ae1f
24 out <- [Build["AddRef"]]Value <<[value] 24 out <- [Build["AddRef"]]Value <<[value]
25 } 25 }
26 26
27 Make Op@AddRef[addref,func:out] 27 Make Op@AddRef[addref,func:out]
28 { 28 {
29 //TODO: Make me work with other backends
29 out <- [["add_ref("]Append[ [[addref]Value >>]Make Op[func] ]]Append[")"] 30 out <- [["add_ref("]Append[ [[addref]Value >>]Make Op[func] ]]Append[")"]
30 } 31 }
31 32
32 Make Op@String[string,func:out] 33 Make Op@String[string,func:out]
33 { 34 {
72 Make Op@Result[result,func:out] 73 Make Op@Result[result,func:out]
73 { 74 {
74 out <- [func]Result Reference[[result]Output Num>>] 75 out <- [func]Result Reference[[result]Output Num>>]
75 } 76 }
76 77
78 Blueprint NotCond
79 {
80 Condition
81 }
77 82
83 NotCond[cond:out]
84 {
85 out <- [Build["NotCond"]]Condition <<[cond]
86 }
87
88 Make Op@NotCond[cond,func:out]
89 {
90 out <- ["!"]Append[[[cond]Condition >>]Make Op[func]]
91 }