diff testfileread.rhope @ 80:d78613686a38

Some progress on File
author Mike Pavone <pavone@retrodev.com>
date Wed, 21 Jul 2010 00:45:13 -0400
parents
children dbe95bfec970
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/testfileread.rhope	Wed Jul 21 00:45:13 2010 -0400
@@ -0,0 +1,8 @@
+
+Main[]
+{
+	f <- [File["test.txt"]]Open["r"]
+	,data <- [f]Read[[f]Length]
+	Print[String[data]]
+}
+