Mercurial > repos > rhope

diff testc_c.rhope @ 96:5a08705f7610

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Semi-broken cleanup of Array implementation
author Mike Pavone <pavone@retrodev.com>
date Mon, 02 Aug 2010 05:12:19 -0400
parents e73a93fb5de1
children
line wrap: on
line diff
--- a/testc_c.rhope	Mon Aug 02 01:55:56 2010 -0400
+++ b/testc_c.rhope	Mon Aug 02 05:12:19 2010 -0400
@@ -78,11 +78,10 @@
 	]Call["Fib", [()]Append[Constant["const_30"]]]
 	]Move[Result[0], "out"]
 
-	Print[
-		[[[prog]Store Function[func]
+	text <- [[[prog]Store Function[func]
 		]Store Function[main]
 		]Text
-	]
-		
+	Print[[text]Length]
+	{ Print[text] }
 }