Adjusting LuaSrcDiet so we can use dofile() and call it, returning the trimmed down source (Oliver Schneider)
This commit is contained in:
parent
0ba8efd2df
commit
4284905a9f
@ -7,40 +7,10 @@
|
||||
|
||||
|
||||
local function loadScript(fname)
|
||||
dofile("scripts/luasrcdiet/LuaSrcDiet.lua")
|
||||
fname = path.getabsolute(fname)
|
||||
local f = io.open(fname)
|
||||
local s = assert(f:read("*a"))
|
||||
f:close()
|
||||
|
||||
-- strip tabs
|
||||
s = s:gsub("[\t]", "")
|
||||
|
||||
-- strip any CRs
|
||||
s = s:gsub("[\r]", "")
|
||||
|
||||
-- strip out block comments
|
||||
s = s:gsub("[^\"']%-%-%[%[.-%]%]", "")
|
||||
s = s:gsub("[^\"']%-%-%[=%[.-%]=%]", "")
|
||||
s = s:gsub("[^\"']%-%-%[==%[.-%]==%]", "")
|
||||
|
||||
-- strip out inline comments
|
||||
s = s:gsub("\n%-%-[^\n]*", "\n")
|
||||
|
||||
-- escape backslashes
|
||||
s = s:gsub("\\", "\\\\")
|
||||
|
||||
-- strip duplicate line feeds
|
||||
s = s:gsub("\n+", "\n")
|
||||
|
||||
-- strip out leading comments
|
||||
s = s:gsub("^%-%-[^\n]*\n", "")
|
||||
|
||||
-- escape line feeds
|
||||
s = s:gsub("\n", "\\n")
|
||||
|
||||
-- escape double quote marks
|
||||
s = s:gsub("\"", "\\\"")
|
||||
|
||||
local s,l = get_slim_luasrc(fname)
|
||||
print("\ttrimmed size: ", s:len(), " down from: ", l:len())
|
||||
return s
|
||||
end
|
||||
|
||||
|
@ -4097,6 +4097,8 @@ local EOLTYPES = { -- EOL names for token dump
|
||||
------------------------------------------------------------------------
|
||||
-- read source code from file
|
||||
------------------------------------------------------------------------
|
||||
local loaded_file_contents = ""
|
||||
local saved_file_contents = ""
|
||||
|
||||
local function load_file(fname)
|
||||
local INF = io.open(fname, "rb")
|
||||
@ -4104,6 +4106,7 @@ local function load_file(fname)
|
||||
local dat = INF:read("*a")
|
||||
if not dat then die('cannot read from "'..fname..'"') end
|
||||
INF:close()
|
||||
loaded_file_contents = dat
|
||||
return dat
|
||||
end
|
||||
|
||||
@ -4112,11 +4115,14 @@ end
|
||||
------------------------------------------------------------------------
|
||||
|
||||
local function save_file(fname, dat)
|
||||
saved_file_contents = dat
|
||||
--[[
|
||||
local OUTF = io.open(fname, "wb")
|
||||
if not OUTF then die('cannot open "'..fname..'" for writing') end
|
||||
local status = OUTF:write(dat)
|
||||
if not status then die('cannot write to "'..fname..'"') end
|
||||
OUTF:close()
|
||||
]]
|
||||
end
|
||||
|
||||
------------------------------------------------------------------------
|
||||
@ -4457,6 +4463,7 @@ end
|
||||
-- main functions
|
||||
----------------------------------------------------------------------]]
|
||||
|
||||
--[[
|
||||
local arg = {...} -- program arguments
|
||||
local fspec = {}
|
||||
set_options(DEFAULT_CONFIG) -- set to default options at beginning
|
||||
@ -4594,5 +4601,15 @@ end
|
||||
if not main() then
|
||||
die("Please run with option -h or --help for usage information")
|
||||
end
|
||||
|
||||
]]
|
||||
-- end of script
|
||||
|
||||
-- Start of premake4 customizations
|
||||
function get_slim_luasrc(fname)
|
||||
set_options(DEFAULT_CONFIG)
|
||||
set_options(MAXIMUM_CONFIG)
|
||||
option.OUTPUT_FILE = "-"
|
||||
option.QUIET = true
|
||||
process_file(fname, "-")
|
||||
return saved_file_contents or "", loaded_file_contents
|
||||
end
|
||||
|
Reference in New Issue
Block a user