From: "Lukas/ConTeXt" <lpr.context@email.cz>
To: <ntg-context@ntg.nl>
Subject: Checking existence of a macro (control sequence) by Lua - problem after updating MkIV
Date: Thu, 18 Jun 2020 10:27:34 +0200 (CEST) [thread overview]
Message-ID: <aKZ.6Ap99.6My3xehTF99.1UwoLs@seznam.cz> (raw)
[-- Attachment #1: Type: text/plain, Size: 1335 bytes --]
Hello,
I'm using Hans' macro suggested some time before.
I've just updated Ctx MkIV and my sample code:
----
\starttext
\def\MyMacro{Ahoj}
\def\MyMacWithPars#1#2{Something}
\def\Undefined{}
\let\Undefined\undefined
\def\DoNothing{}
\let\DoNothing\donothing
\startluacode
if CONTEXTLMTXMODE == 0 then
local d = tokens.defined
local c = tokens.create
function tokens.defined(s,b)
if b then
return d(s)
else
return c(s).cmd_name == "undefined_cmd"
end
end
end
--
local defined = tokens.defined
for _, v in ipairs{ "MyMacro", "MyMacWithPars", "Undefined", "DoNothing", "NonExisting" } do
print(string.format("\letterpercent-12s", v), defined(v), defined(v, true), defined(v, false))
end
\stopluacode
Aaa
\stoptext
----
gives:
"
MyMacro false false false
MyMacWithPars false false false
Undefined false false false
DoNothing false false false
NonExisting false false false
"
IOW, I'm not able to determine whether a control sequence has not been defined (or has \undefined value) or not.
Am I doing a trivial mistake or has anything changed?
Thank you for patience...
Lukas
[-- Attachment #2: IsMacDef3.log --]
[-- Type: text/plain, Size: 7235 bytes --]
open source > level 1, order 1, name 'd:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-yes.mkiv'
system >
system > ConTeXt ver: 2020.06.17 18:56 MKIV beta fmt: 2020.6.18 int: english/english
system >
system > 'cont-new.mkiv' loaded
open source > level 2, order 2, name 'd:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-new.mkiv'
system > beware: some patches loaded from cont-new.mkiv
close source > level 2, order 2, name 'd:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-new.mkiv'
system > jobfiles > using path: d:/Lukas/ConTeXt/Styles
system > files > jobname 'IsMacDef3', input 'D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv', result 'IsMacDef3'
fonts > latin modern fonts are not preloaded
languages > language 'en' is active
open source > level 2, order 3, name 'D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv'
fonts > preloading latin modern fonts (second stage)
fonts > 'fallback modern-designsize rm 12pt' is loaded
backend > xmp > using file 'd:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/lpdf-pdx.xml'
pages > flushing realpage 1, userpage 1, subpage 1
close source > level 2, order 3, name 'D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv'
close source > level 1, order 3, name 'd:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-yes.mkiv'
system > start used files
system > text: IsMacDef3
system > stop used files
system > start used files
system > 1: filename=char-prv.lua filetype=tex format=tex foundname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/char-prv.lua fullname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/char-prv.lua usedmethod=database
system > 2: filename=cont-yes.mkiv filetype=tex foundname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-yes.mkiv fullname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-yes.mkiv usedmethod=database
system > 3: filename=publ-imp-default.lua filetype=lua foundname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/publ-imp-default.lua fullname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/publ-imp-default.lua usedmethod=otherwise
system > 4: filename=cont-new.mkiv filetype=tex foundname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-new.mkiv fullname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-new.mkiv usedmethod=database
system > 5: filename=lang-exc.lua filetype=lua foundname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/lang-exc.lua fullname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/lang-exc.lua usedmethod=otherwise
system > 6: filename=lang-us.lua filetype=lua foundname=d:/Ctx-Beta/tex/texmf-context/tex/context/patterns/mkiv/lang-us.lua fullname=d:/Ctx-Beta/tex/texmf-context/tex/context/patterns/mkiv/lang-us.lua usedmethod=otherwise
system > 7: filename=D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv foundname=D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv fullname=D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv usedmethod=direct
system > 8: filename=lm.lfg filetype=tex foundname=d:/Ctx-Beta/tex/texmf-context/tex/context/fonts/mkiv/lm.lfg fullname=d:/Ctx-Beta/tex/texmf-context/tex/context/fonts/mkiv/lm.lfg usedmethod=database
system > 9: filename=lmroman12-regular filetype=otf format=otf foundname=d:/Ctx-Beta/tex/texmf/fonts/opentype/public/lm/lmroman12-regular.otf fullname=d:/Ctx-Beta/tex/texmf/fonts/opentype/public/lm/lmroman12-regular.otf usedmethod=database
system > 10: filename=latinmodern-math.otf filetype=opentypefonts foundname=d:/Ctx-Beta/tex/texmf/fonts/opentype/public/lm-math/latinmodern-math.otf fullname=d:/Ctx-Beta/tex/texmf/fonts/opentype/public/lm-math/latinmodern-math.otf usedmethod=database
system > 11: filename=pdftex.map filetype=map format=map foundname=d:/Ctx-Beta/tex/texmf/fonts/map/pdftex/plain/pdftex.map fullname=d:/Ctx-Beta/tex/texmf/fonts/map/pdftex/plain/pdftex.map usedmethod=database
system > 12: filename=lpdf-pdx.xml filetype=tex foundname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/lpdf-pdx.xml fullname=d:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/lpdf-pdx.xml usedmethod=database
system > stop used files
system > start commandline options
system > currentrun="1"
system > fulljobname="D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv"
system > input="D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv"
system > kindofrun="1"
system > maxnofruns="9"
system > nonstopmode="true"
system > path="d:/Lukas/ConTeXt/Styles"
system > texmfbinpath="d:/Ctx-Beta/tex/texmf-mswin/bin"
system > stop commandline options
system > start commandline files
system > 1: D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv
system > stop commandline files
modules > start used modules
modules > stop used modules
mkiv lua stats > used config file: selfautoparent:/texmf/web2c/texmfcnf.lua
mkiv lua stats > used cache path: d:/Ctx-Beta/tex/texmf-cache/luatex-cache/context/5fe67e0bfe781ce0dde776fb1556f32e
mkiv lua stats > resource resolver: loadtime 0.008 seconds, 0 scans with scantime 0.000 seconds, 0 shared scans, 12 found files, scanned paths: <none>
mkiv lua stats > stored bytecode data: 452 modules (0.231 sec), 93 tables (0.013 sec), 545 chunks (0.244 sec)
mkiv lua stats > traced context: maxstack: 1409, freed: 0, unreachable: 1409
mkiv lua stats > cleaned up reserved nodes: 57 nodes, 9 lists of 442
mkiv lua stats > node memory usage: 11 attribute, 4 attribute_list, 1 glue, 51 glue_spec, 3 kern, 2 penalty, 2 temp, 2 user_defined
mkiv lua stats > node list callback tasks: 8 unique task lists, 7 instances (re)created, 38 calls
mkiv lua stats > used backend: pdf (backend for directly generating pdf output)
mkiv lua stats > jobdata time: 0.001 seconds saving, 0.001 seconds loading
mkiv lua stats > callbacks: internal: 138, file: 179, direct: 3, late: 0, function 502, total: 822
mkiv lua stats > randomizer: resumed with value 0.54769897460938
mkiv lua stats > result saved in file: IsMacDef3.pdf, compresslevel 3, objectcompresslevel 1
mkiv lua stats > loaded patterns: en::1, load time: 0.000
mkiv lua stats > loaded fonts: 2 files: latinmodern-math.otf, lmroman12-regular.otf
mkiv lua stats > font engine: otf 3.111, afm 1.513, tfm 1.000, 7 instances, 3 shared in backend, 3 common vectors, 0 common hashes, load time 0.191 seconds
mkiv lua stats > used platform: mswin, type: windows, binary subtree: texmf-mswin
mkiv lua stats > used engine: luatex version: 1.13, functionality level: 7353, banner: this is luatex, version 1.13.0 (tex live 2020/w32tex)
mkiv lua stats > used hash slots: 45878 of 65536 + 100000
mkiv lua stats > lua properties: engine: lua 5.3, used memory: 71 MB, ctx: 70 MB, max: unknown MB, hash chars: min(32,40), symbol mask: utf (τεχ)
mkiv lua stats > runtime: 0.494 seconds, 1 processed pages, 1 shipped pages, 2.024 pages/second
[-- Attachment #3: IsMacDef3.mkiv --]
[-- Type: text/plain, Size: 798 bytes --]
\starttext
\def\MyMacro{Ahoj}
\def\MyMacWithPars#1#2{Something}
\def\Undefined{}
\let\Undefined\undefined
\def\DoNothing{}
\let\DoNothing\donothing
\startluacode
if CONTEXTLMTXMODE == 0 then
local d = tokens.defined
local c = tokens.create
function tokens.defined(s,b)
if b then
return d(s)
else
return c(s).cmd_name == "undefined_cmd"
end
end
end
--
local defined = tokens.defined
for _, v in ipairs{ "MyMacro", "MyMacWithPars", "Undefined", "DoNothing", "NonExisting" } do
print(string.format("\letterpercent-12s", v), defined(v), defined(v, true), defined(v, false))
end
\stopluacode
Aaa
\stoptext
[-- Attachment #4: IsMacDef3.log_ --]
[-- Type: text/plain, Size: 3980 bytes --]
resolvers | formats | executing runner 'run luatex format': d:/Ctx-Beta/tex/texmf-mswin/bin/luatex --interaction="nonstopmode" --jobnam
xmf-mswin/bin"
This is LuaTeX, Version 1.13.0 (TeX Live 2020/W32TeX)
system commands enabled.
open source > level 1, order 1, name 'd:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-yes.mkiv'
system >
system > ConTeXt ver: 2020.06.17 18:56 MKIV beta fmt: 2020.6.18 int: english/english
system >
system > 'cont-new.mkiv' loaded
open source > level 2, order 2, name 'd:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-new.mkiv'
system > beware: some patches loaded from cont-new.mkiv
close source > level 2, order 2, name 'd:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-new.mkiv'
system > jobfiles > using path: d:/Lukas/ConTeXt/Styles
system > files > jobname 'IsMacDef3', input 'D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv', result 'IsMacDef3'
fonts > latin modern fonts are not preloaded
languages > language 'en' is active
open source > level 2, order 3, name 'D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv'
fonts > preloading latin modern fonts (second stage)
fonts > 'fallback modern-designsize rm 12pt' is loaded
MyMacro false false false
MyMacWithPars false false false
Undefined false false false
DoNothing false false false
NonExisting false false false
backend > xmp > using file 'd:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/lpdf-pdx.xml'
pages > flushing realpage 1, userpage 1, subpage 1
close source > level 2, order 3, name 'D:/Lukas/ConTeXt/Test/IsMacDef3.mkiv'
close source > level 1, order 3, name 'd:/Ctx-Beta/tex/texmf-context/tex/context/base/mkiv/cont-yes.mkiv'
mkiv lua stats > used config file: selfautoparent:/texmf/web2c/texmfcnf.lua
mkiv lua stats > used cache path: d:/Ctx-Beta/tex/texmf-cache/luatex-cache/context/5fe67e0bfe781ce0dde776fb1556f32e
mkiv lua stats > resource resolver: loadtime 0.008 seconds, 0 scans with scantime 0.000 seconds, 0 shared scans, 12 found files, scanned pat
mkiv lua stats > stored bytecode data: 452 modules (0.231 sec), 93 tables (0.013 sec), 545 chunks (0.244 sec)
mkiv lua stats > traced context: maxstack: 1409, freed: 0, unreachable: 1409
mkiv lua stats > cleaned up reserved nodes: 57 nodes, 9 lists of 442
mkiv lua stats > node memory usage: 11 attribute, 4 attribute_list, 1 glue, 51 glue_spec, 3 kern, 2 penalty, 2 temp, 2 user_defined
mkiv lua stats > node list callback tasks: 8 unique task lists, 7 instances (re)created, 38 calls
mkiv lua stats > used backend: pdf (backend for directly generating pdf output)
mkiv lua stats > jobdata time: 0.001 seconds saving, 0.001 seconds loading
mkiv lua stats > callbacks: internal: 138, file: 179, direct: 3, late: 0, function 502, total: 822
mkiv lua stats > randomizer: resumed with value 0.54769897460938
mkiv lua stats > result saved in file: IsMacDef3.pdf, compresslevel 3, objectcompresslevel 1
mkiv lua stats > loaded patterns: en::1, load time: 0.000
mkiv lua stats > loaded fonts: 2 files: latinmodern-math.otf, lmroman12-regular.otf
mkiv lua stats > font engine: otf 3.111, afm 1.513, tfm 1.000, 7 instances, 3 shared in backend, 3 common vectors, 0 common hashes, load tim
mkiv lua stats > used platform: mswin, type: windows, binary subtree: texmf-mswin
mkiv lua stats > used engine: luatex version: 1.13, functionality level: 7353, banner: this is luatex, version 1.13.0 (tex live 2020/w32tex)
mkiv lua stats > used hash slots: 45878 of 65536 + 100000
mkiv lua stats > lua properties: engine: lua 5.3, used memory: 71 MB, ctx: 70 MB, max: unknown MB, hash chars: min(32,40), symbol mask: utf
mkiv lua stats > runtime: 0.494 seconds, 1 processed pages, 1 shipped pages, 2.024 pages/second
system | total runtime: 0.798 seconds
[-- Attachment #5: Type: text/plain, Size: 493 bytes --]
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!
maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___________________________________________________________________________________
next reply other threads:[~2020-06-18 8:27 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2020-06-18 8:27 Lukas/ConTeXt [this message]
2020-06-18 10:21 ` Hans van der Meer
2020-06-18 10:29 ` Lukas/ConTeXt
2020-06-18 20:52 ` Hans Hagen
2020-06-19 6:36 ` Lukas/ConTeXt
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=aKZ.6Ap99.6My3xehTF99.1UwoLs@seznam.cz \
--to=lpr.context@email.cz \
--cc=ntg-context@ntg.nl \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).