about summary refs log tree commit diff stats
path: root/apps/print-file.mu
diff options
context:
space:
mode:
Diffstat (limited to 'apps/print-file.mu')
-rw-r--r--apps/print-file.mu39
1 files changed, 0 insertions, 39 deletions
diff --git a/apps/print-file.mu b/apps/print-file.mu
deleted file mode 100644
index 57e044dc..00000000
--- a/apps/print-file.mu
+++ /dev/null
@@ -1,39 +0,0 @@
-# accept a filename on the commandline, read it and print it out to screen
-# only ascii right now, just like the rest of Mu
-#
-# To run:
-#   $ ./translate_mu apps/print-file.mu
-#   $ echo abc > x
-#   $ ./a.elf x
-#   abc
-
-fn main _args: (addr array addr array byte) -> _/ebx: int {
-  var args/eax: (addr array addr array byte) <- copy _args
-  var n/ecx: int <- length args
-  compare n, 1
-  {
-    break-if->
-    print-string 0/screen, "usage: cat <filename>\n"
-    return 0
-  }
-  {
-    break-if-<=
-    var filename/edx: (addr addr array byte) <- index args 1
-    var in: (handle buffered-file)
-    {
-      var addr-in/eax: (addr handle buffered-file) <- address in
-      open *filename, 0/read-only, addr-in
-    }
-    var _in-addr/eax: (addr buffered-file) <- lookup in
-    var in-addr/ecx: (addr buffered-file) <- copy _in-addr
-    {
-      var c/eax: byte <- read-byte-buffered in-addr
-      compare c, 0xffffffff/end-of-file
-      break-if-=
-      var g/eax: grapheme <- copy c
-      print-grapheme 0/screen, g
-      loop
-    }
-  }
-  return 0
-}