diff options
author | Hans Hagen <pragma@wxs.nl> | 2010-11-01 21:16:00 +0100 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2010-11-01 21:16:00 +0100 |
commit | 095b801b8c7a75ca5e214acbe6a62bfff31559d9 (patch) | |
tree | 370ef674c188c272bfb84cc2e9f1fbe794381bd0 /scripts | |
parent | 5af44dc9b7791e82d01b0cc817a128ad0332b07d (diff) | |
download | context-095b801b8c7a75ca5e214acbe6a62bfff31559d9.tar.gz |
beta 2010.11.01 21:16
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/context/lua/mtxrun.lua | 16 | ||||
-rw-r--r-- | scripts/context/stubs/mswin/mtxrun.lua | 16 | ||||
-rwxr-xr-x | scripts/context/stubs/unix/mtxrun | 16 |
3 files changed, 36 insertions, 12 deletions
diff --git a/scripts/context/lua/mtxrun.lua b/scripts/context/lua/mtxrun.lua index 2c50f7eee..6e0c2b74c 100644 --- a/scripts/context/lua/mtxrun.lua +++ b/scripts/context/lua/mtxrun.lua @@ -207,8 +207,8 @@ local lpeg = require("lpeg") lpeg.patterns = lpeg.patterns or { } -- so that we can share local patterns = lpeg.patterns -local P, R, S, Ct, C, Cs, Cc, V = lpeg.P, lpeg.R, lpeg.S, lpeg.Ct, lpeg.C, lpeg.Cs, lpeg.Cc, lpeg.V -local match = lpeg.match +local P, R, S, V, match = lpeg.P, lpeg.R, lpeg.S, lpeg.V, lpeg.match +local Ct, C, Cs, Cc, Cf, Cg = lpeg.Ct, lpeg.C, lpeg.Cs, lpeg.Cc, lpeg.Cf, lpeg.Cg local utfcharacters = string.utfcharacters local utfgmatch = unicode and unicode.utf8.gmatch @@ -3866,6 +3866,8 @@ utilities.parsers = utilities.parsers or { } local parsers = utilities.parsers parsers.patterns = parsers.patterns or { } +-- we could use a Cf Cg construct + local P, R, V, C, Ct, Carg = lpeg.P, lpeg.R, lpeg.V, lpeg.C, lpeg.Ct, lpeg.Carg local lpegmatch = lpeg.match local concat, format, gmatch = table.concat, string.format, string.gmatch @@ -5151,8 +5153,14 @@ function logs.obsolete(old,new) end end -function logs.texerrormessage(...) -- for the moment we put this function here - tex.error(format(...), { }) +if tex and tex.error then + function logs.texerrormessage(...) -- for the moment we put this function here + tex.error(format(...), { }) + end +else + function logs.texerrormessage(...) + print(format(...)) + end end diff --git a/scripts/context/stubs/mswin/mtxrun.lua b/scripts/context/stubs/mswin/mtxrun.lua index 2c50f7eee..6e0c2b74c 100644 --- a/scripts/context/stubs/mswin/mtxrun.lua +++ b/scripts/context/stubs/mswin/mtxrun.lua @@ -207,8 +207,8 @@ local lpeg = require("lpeg") lpeg.patterns = lpeg.patterns or { } -- so that we can share local patterns = lpeg.patterns -local P, R, S, Ct, C, Cs, Cc, V = lpeg.P, lpeg.R, lpeg.S, lpeg.Ct, lpeg.C, lpeg.Cs, lpeg.Cc, lpeg.V -local match = lpeg.match +local P, R, S, V, match = lpeg.P, lpeg.R, lpeg.S, lpeg.V, lpeg.match +local Ct, C, Cs, Cc, Cf, Cg = lpeg.Ct, lpeg.C, lpeg.Cs, lpeg.Cc, lpeg.Cf, lpeg.Cg local utfcharacters = string.utfcharacters local utfgmatch = unicode and unicode.utf8.gmatch @@ -3866,6 +3866,8 @@ utilities.parsers = utilities.parsers or { } local parsers = utilities.parsers parsers.patterns = parsers.patterns or { } +-- we could use a Cf Cg construct + local P, R, V, C, Ct, Carg = lpeg.P, lpeg.R, lpeg.V, lpeg.C, lpeg.Ct, lpeg.Carg local lpegmatch = lpeg.match local concat, format, gmatch = table.concat, string.format, string.gmatch @@ -5151,8 +5153,14 @@ function logs.obsolete(old,new) end end -function logs.texerrormessage(...) -- for the moment we put this function here - tex.error(format(...), { }) +if tex and tex.error then + function logs.texerrormessage(...) -- for the moment we put this function here + tex.error(format(...), { }) + end +else + function logs.texerrormessage(...) + print(format(...)) + end end diff --git a/scripts/context/stubs/unix/mtxrun b/scripts/context/stubs/unix/mtxrun index 2c50f7eee..6e0c2b74c 100755 --- a/scripts/context/stubs/unix/mtxrun +++ b/scripts/context/stubs/unix/mtxrun @@ -207,8 +207,8 @@ local lpeg = require("lpeg") lpeg.patterns = lpeg.patterns or { } -- so that we can share local patterns = lpeg.patterns -local P, R, S, Ct, C, Cs, Cc, V = lpeg.P, lpeg.R, lpeg.S, lpeg.Ct, lpeg.C, lpeg.Cs, lpeg.Cc, lpeg.V -local match = lpeg.match +local P, R, S, V, match = lpeg.P, lpeg.R, lpeg.S, lpeg.V, lpeg.match +local Ct, C, Cs, Cc, Cf, Cg = lpeg.Ct, lpeg.C, lpeg.Cs, lpeg.Cc, lpeg.Cf, lpeg.Cg local utfcharacters = string.utfcharacters local utfgmatch = unicode and unicode.utf8.gmatch @@ -3866,6 +3866,8 @@ utilities.parsers = utilities.parsers or { } local parsers = utilities.parsers parsers.patterns = parsers.patterns or { } +-- we could use a Cf Cg construct + local P, R, V, C, Ct, Carg = lpeg.P, lpeg.R, lpeg.V, lpeg.C, lpeg.Ct, lpeg.Carg local lpegmatch = lpeg.match local concat, format, gmatch = table.concat, string.format, string.gmatch @@ -5151,8 +5153,14 @@ function logs.obsolete(old,new) end end -function logs.texerrormessage(...) -- for the moment we put this function here - tex.error(format(...), { }) +if tex and tex.error then + function logs.texerrormessage(...) -- for the moment we put this function here + tex.error(format(...), { }) + end +else + function logs.texerrormessage(...) + print(format(...)) + end end |