1 files changed, 0 insertions, 76 deletions
diff --git a/prototypes/tile/3.mu b/prototypes/tile/3.mu
deleted file mode 100644
index 94c9cc8c..00000000
--- a/prototypes/tile/3.mu
+++ /dev/null
@@ -1,76 +0,0 @@
-# benchmark: how fast can we print characters to screen?
-#
-# Requires a large file called "x" containing just ascii characters. One way
-# to generate it:
-#   cat /dev/urandom |base64 - |head -n 10000 > x
-# then merge pairs of lines.
-
-fn main -> exit-status/ebx: int {
-  var num-lines/ecx: int <- copy 0x64  # 100
-  clear-screen 0
-  # open a file
-  var f: (addr buffered-file)
-  {
-    var f-handle: (handle buffered-file)
-    var f-in/eax: (addr handle buffered-file) <- address f-handle
-    open "x", 0, f-in  # for reading
-    var f-out/eax: (addr buffered-file) <- lookup f-handle
-    copy-to f, f-out
-  }
-  # initial time
-  var t1_/eax: int <- time
-  var t1/edx: int <- copy t1_
-  # main loop
-  var iter/eax: int <- copy 1
-  {
-    compare iter, 0x640  # 1600
-    break-if->
-    render f, num-lines
-    iter <- increment
-    loop
-  }
-  # final time
-  var t2_/eax: int <- time
-  var t2/ebx: int <- copy t2_
-  # time taken
-  var t3/esi: int <- copy t2
-  t3 <- subtract t1
-  # clean up
-  clear-screen 0
-  # results
-  print-int32-hex 0, t1
-  print-string 0, "\n"
-  print-int32-hex 0, t2
-  print-string 0, "\n"
-  print-int32-hex 0, t3
-  print-string 0, "\n"
-  #
-  exit-status <- copy 0
-}
-
-fn render f: (addr buffered-file), num-rows: int {
-  var num-cols/ecx: int <- copy 0x64  # 100
-  # render screen
-  var row/edx: int <- copy 1
-  var col/ebx: int <- copy 1
-  move-cursor 0, row, col
-$render:render-loop: {
-    compare row, num-rows
-    break-if->=
-    var c/eax: byte <- read-byte-buffered f
-    compare c, 0xffffffff  # EOF marker
-    break-if-=
-    compare c, 0xa  # newline
-    {
-      break-if-!=
-      row <- increment
-      col <- copy 0
-      move-cursor 0, row, col
-      loop $render:render-loop
-    }
-    var g/eax: grapheme <- copy c
-    print-grapheme 0, g
-    col <- increment
-    loop
-  }
-}