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.

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

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

diff --git a/LuaSL/testLua/yueliang-0.4.1/nat-5.0.3/test/bench_llex_mk4.lua b/LuaSL/testLua/yueliang-0.4.1/nat-5.0.3/test/bench_llex_mk4.lua
deleted file mode 100644
index b94386b..0000000
--- a/LuaSL/testLua/yueliang-0.4.1/nat-5.0.3/test/bench_llex_mk4.lua
+++ /dev/null
@@ -1,94 +0,0 @@
---[[--------------------------------------------------------------------
-
-  bench_llex.lua
-  Benchmark test for llex.lua
-  This file is part of Yueliang.
-
-  Copyright (c) 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.
-
-----------------------------------------------------------------------]]
-
-local zio_init = require("../lzio_mk4")
-local lex_init = require("../llex_mk4")
-
-------------------------------------------------------------------------
--- load in a standard set of sample files
--- * file set is 5.0.3 front end set sans luac.lua
-------------------------------------------------------------------------
-
-local fileset, totalsize = {}, 0
-for fn in string.gfind([[
-../../orig-5.0.3/lcode.lua
-../../orig-5.0.3/ldump.lua
-../../orig-5.0.3/llex.lua
-../../orig-5.0.3/lopcodes.lua
-../../orig-5.0.3/lparser.lua
-../../orig-5.0.3/lzio.lua
-]], "%S+") do
-  table.insert(fileset, fn)
-end
-
-for i = 1, table.getn(fileset) do
-  local fn = fileset[i]
-  local inf = io.open(fn, "rb")
-  if not inf then
-    error("failed to open "..fn.." for reading")
-  end
-  local data = inf:read("*a")
-  local data_sz = string.len(data)
-  inf:close()
-  if not data or data_sz == 0 then
-    error("failed to read data from "..fn.." or file is zero-length")
-  end
-  totalsize = totalsize + data_sz
-  fileset[i] = data
-end
-
-------------------------------------------------------------------------
--- benchmark tester
-------------------------------------------------------------------------
-
-local DURATION = 5      -- how long the benchmark should run
-
-local time = os.time
-local lexedsize = 0
-local tnow, elapsed = time(), 0
-
-while time() == tnow do end    -- wait for second to click over
-tnow = time()
-
-while true do
-  for i = 1, table.getn(fileset) do
-    ------------------------------------------------------------
-    local chunk = fileset[i]
-    local z = zio_init(chunk)
-    local luaX = lex_init(z, "=string")
-    while true do
-      local tok, seminfo = luaX:lex()
-      if tok == "<eof>" then break end
-    end
-    ------------------------------------------------------------
-    lexedsize = lexedsize + string.len(chunk)
-    if time() > tnow then
-      tnow = time()
-      elapsed = elapsed + 1
-      if elapsed >= DURATION then
-        -- report performance of lexer
-        lexedsize = lexedsize / 1024
-        local speed = lexedsize / DURATION
-        print("Lexer performance:")
-        print("Size of data lexed (KB): "..string.format("%.1f", lexedsize))
-        print("Speed of lexer (KB/s): "..string.format("%.1f", speed))
-        -- repeat until user breaks program
-        elapsed = 0
-      end
-    end
-    ------------------------------------------------------------
-  end--for
-end--while
-
--- end of script
-- 
cgit v1.1