From 9621add2918cc4943e6693b74ae85d51dd264fcf Mon Sep 17 00:00:00 2001
From: David Walter Seikel
Date: Mon, 21 Apr 2014 20:59:39 +1000
Subject: We don't need the testlua directory any more.

---
 .../testLua/yueliang-0.4.1/nat-5.0.3/lzio_mk2.lua  | 106 ---------------------
 1 file changed, 106 deletions(-)
 delete mode 100644 LuaSL/testLua/yueliang-0.4.1/nat-5.0.3/lzio_mk2.lua

(limited to 'LuaSL/testLua/yueliang-0.4.1/nat-5.0.3/lzio_mk2.lua')

diff --git a/LuaSL/testLua/yueliang-0.4.1/nat-5.0.3/lzio_mk2.lua b/LuaSL/testLua/yueliang-0.4.1/nat-5.0.3/lzio_mk2.lua
deleted file mode 100644
index 6378366..0000000
--- a/LuaSL/testLua/yueliang-0.4.1/nat-5.0.3/lzio_mk2.lua
+++ /dev/null
@@ -1,106 +0,0 @@
---[[--------------------------------------------------------------------
-
-  lzio.lua
-  Lua 5 buffered streams in Lua
-  This file is part of Yueliang.
-
-  Copyright (c) 2005-2006 Kein-Hong Man <khman@users.sf.net>
-  The COPYRIGHT file describes the conditions
-  under which this software may be distributed.
-
-  See the ChangeLog for more information.
-
-----------------------------------------------------------------------]]
-
---[[--------------------------------------------------------------------
--- Notes:
--- *
-----------------------------------------------------------------------]]
-
---[[--------------------------------------------------------------------
--- local zio_init = require("lzio.lua")
--- local z = zio_init("@<filename>")
--- local z = zio_init("<string>")
--- z:getc()
--- * get next character from input stream
--- z:fill()
--- * fills an empty stream buffer
--- z.name
--- * name of the chunk, "@<filename>" or "=string"
-----------------------------------------------------------------------]]
-
---[[--------------------------------------------------------------------
--- Format of z structure (ZIO)
--- z.n       -- bytes still unread
--- z.p       -- last read position in buffer
--- z.reader  -- chunk reader function
--- z.data    -- data buffer
--- z.name    -- name of stream
-----------------------------------------------------------------------]]
-
-return
-function(buff)
---[[--------------------------------------------------------------------
--- initialize reader
--- * reader should return a string, or nil if nothing else to parse
-----------------------------------------------------------------------]]
-  local reader
-  local z = {}
-  if string.sub(buff, 1, 1) == "@" then
-    ----------------------------------------------------------------
-    -- create a chunk reader function from a source file
-    ----------------------------------------------------------------
-    z.name = buff
-    local BUFFERSIZE = 512
-    local h = io.open(string.sub(buff, 2), "r")
-    if not h then return nil end
-    reader = function()
-      if not h or io.type(h) == "closed file" then return nil end
-      local buff = h:read(BUFFERSIZE)
-      if not buff then h:close(); h = nil end
-      return buff
-    end
-  else
-    ----------------------------------------------------------------
-    -- create a chunk reader function from a source string
-    ----------------------------------------------------------------
-    z.name = "=string"
-    reader = function()
-      if not buff then return nil end
-      local data = buff
-      buff = nil
-      return data
-    end
-  end
---[[--------------------------------------------------------------------
--- fills an empty stream buffer, returns first character
-----------------------------------------------------------------------]]
-  function z:fill()
-    local data = z.reader()
-    z.data = data
-    if not data or data == "" then return "EOZ" end
-    z.n, z.p = string.len(data) - 1, 1
-    return string.sub(data, 1, 1)
-  end
---[[--------------------------------------------------------------------
--- get next character, fills buffer if characters needed
-----------------------------------------------------------------------]]
-  function z:getc()
-    local n, p = z.n, z.p + 1
-    if n > 0 then
-      z.n, z.p = n - 1, p
-      return string.sub(z.data, p, p)
-    else
-      return self:fill()
-    end
-  end
---[[--------------------------------------------------------------------
--- initialize input stream object
-----------------------------------------------------------------------]]
-  if not reader then return end
-  z.reader = reader
-  z.data = ""
-  z.n, z.p = 0, 0
-  return z
---[[------------------------------------------------------------------]]
-end
-- 
cgit v1.1