comparison: squish.lua
squish.lua
- changeset 83
- ff14c066a643
- parent 82
- 4d6a976c3bb7
- child 86
- 2322f7932064
equal
deleted
inserted
replaced
| 82:4d6a976c3bb7 | 83:ff14c066a643 |
|---|---|
| 163 if opts.executable == true then | 163 if opts.executable == true then |
| 164 f:write("#!/usr/bin/env lua\n"); | 164 f:write("#!/usr/bin/env lua\n"); |
| 165 else | 165 else |
| 166 f:write(opts.executable, "\n"); | 166 f:write(opts.executable, "\n"); |
| 167 end | 167 end |
| 168 end | |
| 169 | |
| 170 if opts.debug then | |
| 171 f:write(require_resource("squish.debug")); | |
| 172 end | 168 end |
| 173 | 169 |
| 174 print_verbose("Resolving modules..."); | 170 print_verbose("Resolving modules..."); |
| 175 do | 171 do |
| 176 local LUA_DIRSEP = package.config:sub(1,1); | 172 local LUA_DIRSEP = package.config:sub(1,1); |
| 238 data, err = nil, dataerr; | 234 data, err = nil, dataerr; |
| 239 end | 235 end |
| 240 end | 236 end |
| 241 end | 237 end |
| 242 if data then | 238 if data then |
| 243 f:write("package.preload['", modulename, "'] = (function (...)\n"); | 239 if not opts.debug then |
| 244 f:write(data); | 240 f:write("package.preload['", modulename, "'] = (function (...)\n"); |
| 245 f:write(" end)\n"); | 241 f:write(data); |
| 246 if opts.debug then | 242 f:write(" end)\n"); |
| 247 f:write(string.format("package.preload[%q] = ___adjust_chunk(package.preload[%q], %q);\n\n", | 243 else |
| 248 modulename, modulename, "@"..path)); | 244 f:write("package.preload['", modulename, "'] = assert(loadstring(\n"); |
| 245 f:write(("%q\n"):format(data)); | |
| 246 f:write(", ", ("%q"):format("@"..path), "))\n"); | |
| 249 end | 247 end |
| 250 else | 248 else |
| 251 print_err("Couldn't pack module '"..modulename.."': "..(err or "unknown error... path to module file correct?")); | 249 print_err("Couldn't pack module '"..modulename.."': "..(err or "unknown error... path to module file correct?")); |
| 252 os.exit(1); | 250 os.exit(1); |
| 253 end | 251 end |
