Mercurial > repos > rhope
diff backendutils.rhope @ 18:ea991f95ae1f
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 |
line wrap: on
line diff
--- a/backendutils.rhope Tue May 26 23:37:59 2009 -0400 +++ b/backendutils.rhope Wed May 27 04:49:32 2009 -0400 @@ -26,6 +26,7 @@ Make Op@AddRef[addref,func:out] { + //TODO: Make me work with other backends out <- [["add_ref("]Append[ [[addref]Value >>]Make Op[func] ]]Append[")"] } @@ -74,4 +75,17 @@ out <- [func]Result Reference[[result]Output Num>>] } +Blueprint NotCond +{ + Condition +} +NotCond[cond:out] +{ + out <- [Build["NotCond"]]Condition <<[cond] +} + +Make Op@NotCond[cond,func:out] +{ + out <- ["!"]Append[[[cond]Condition >>]Make Op[func]] +}