subject:"\[NTG\-context\] Checking existence of a macro \(control sequence\) by Lua"

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua - problem after updating MkIV

2020-06-19 Thread Lukas/ConTeXt

Hello Hans,

-- Původní e-mail -- {
Od: Hans Hagen 

as you updated, it's just:

   \startluacode
 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
-- Původní e-mail -- }

your solution gives me:

"
MyMacro false   truefalse
MyMacWithPars   false   truefalse
Undefined   false   truefalse
DoNothing   false   truefalse
NonExisting false   false   false
"
which desn't recognize \Undefined - it should give 'false' in the 2nd column of 
results, like \NonExisting does.

But I have another solution (asked in Czech TUG) - use of 
'token.get_meaning(cs)': 

  \startluacode
for _, v in ipairs{ "MyMacro", "MyMacWithPars", "Undefined", "DoNothing", 
"NonExisting" } do
  print(string.format("\letterpercent-12s", v), "get_meaning", 
token.get_meaning(v) or "(non-existing/undefined)")
end
  \stopluacode


- Produces:

"
MyMacro get_meaning ->Ahoj
MyMacWithPars   get_meaning #1#2->Something
Undefined   get_meaning (non-existing/undefined)
DoNothing   get_meaning ->
NonExisting get_meaning (non-existing/undefined)
"
which is perfectly what I need.

But thank you anyway for your effort.

Best regards,

Lukas
___
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
___

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua - problem after updating MkIV

2020-06-18 Thread Hans Hagen


On 6/18/2020 10:27 AM, Lukas/ConTeXt wrote:

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

as you updated, it's just:

  \startluacode
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


-
  Hans Hagen | PRAGMA ADE
  Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
   tel: 038 477 53 69 | www.pragma-ade.nl | www.pragma-pod.nl
-
___
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
___

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua - problem after updating MkIV

2020-06-18 Thread Lukas/ConTeXt


Hello,




I need to check within Lua.

My sample cases are very minimalistic - I'm working on more complicated task
actually, where check-for-control-sequence-existence need to be performed 
run-time within Lua scope.




Best,




Lukas



-- Původní e-mail --
Od: Hans van der Meer 
Komu: NTG ConTeXt 
Datum: 18. 6. 2020 12:25:42
Předmět: Re: [NTG-context] Checking existence of a macro (control sequence)
by Lua - problem after updating MkIV
"
Why can you not simply use one of the doifundefined macro's? Something for
example:


\doifundefined{ExitStatus}{\gdef\ExitStatus{0}} % default to ok as in UNIX




dr. Hans van der Meer









"
On 18 Jun 2020, at 10:27, Lukas/ConTeXt mailto:lpr.cont...@email.cz)> wrote:



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
___
If your question is of interest to others as well, please add an entry to 
the Wiki!

maillist : ntg-context@ntg.nl(mailto:ntg-context@ntg.nl) / http://www.ntg.
nl/mailman/listinfo/ntg-context
(http://www.ntg.nl/mailman/listinfo/ntg-context)
webpage  : http://www.pragma-ade.nl(http://www.pragma-ade.nl) / http://
context.aanhet.net(http://context.aanhet.net)
archive  : https://bitbucket.org/phg/context-mirror/commits/
(https://bitbucket.org/phg/context-mirror/commits/)
wiki : http://contextgarden.net(http://contextgarden.net)

___


"


___
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

___
"___
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
___

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua - problem after updating MkIV

2020-06-18 Thread Hans van der Meer

Why can you not simply use one of the doifundefined macro's? Something for 
example:
\doifundefined{ExitStatus}{\gdef\ExitStatus{0}} % default to ok as in UNIX

dr. Hans van der Meer


> On 18 Jun 2020, at 10:27, Lukas/ConTeXt  wrote:
> 
> 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___
> 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
> ___

___
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
___

[NTG-context] Checking existence of a macro (control sequence) by Lua - problem after updating MkIV

2020-06-18 Thread Lukas/ConTeXt

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...

Lukasopen 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

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

2020-05-29 Thread context


Hello Hans,

thank you for explanation and the nice how-to solution!

Best regards,

Lukas



Because the macro actually *is* defined: as soon as tex sees

\foo

it reserves the name and gives it the meaning undefined, so even
\undefined is defined.

Anyway, that is why we have \ifdefined that does a different kind of
checking. In retrospect, that is a better one, so I'll adapt that in
lmtx.

\starttext
  \let\MyMacroA\undefined

  \startluacode
local function whatever(s)
context.type("\\" .. s)
context(" is " .. (tokens.defined(s,true) and "defined" or
"undefined")) --% Hans' way
context(" and has meaning " .. (tokens.defined(s) and
"defined" or "undefined")) --% Hans' way
context.par()
end

whatever("MyMacroA")
whatever("MyMacroB")
  \stopluacode

\stoptext

\MyMacroA is defined and has meaning undefined
\MyMacroB is undefined and has meaning undefined


You can do this in current luatex/mkiv:

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

Hans

___
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
___

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

2020-05-29 Thread Hans Hagen


On 5/28/2020 11:24 PM, cont...@vivaldi.net wrote:

Hello,

one more question - why macros \Undefined and \DoNothing show "defined" 
although I (tried to) undefine them?



\starttext
   \def\MyMacro{Ahoj}
   \def\MyMac#1#2{Something}

   \def\Undefined{}
   \let\Undefined\undefined

   \def\DoNothing{}
   \let\DoNothing\donothing

   \startluacode
     local str = { [true] = "defined", [false] = "undefined" }

     local function whatever(s)
   context.type("\\" .. s)
   context(" is " .. (tokens.defined(s) and "defined" or 
"undefined")) --% Hans' way
   context(" and is " .. str[token.is_defined(s)] .. ".") --% 
Henri's way

   context.par()
     end

     whatever("MyMacro")
     whatever("MyMacroD")
     whatever(" ")
     whatever("-")
     whatever("Undefined")
     whatever("DoNothing")
   \stopluacode

   %\Undefined % Causes "! Undefined control sequence"
\stoptext


Gives:

"
\MyMacro is defined and is defined.
\MyMacroD is undefined and is undefined.
\ is defined and is defined.
\- is defined and is defined.
\Undefined is defined and is defined.
\DoNothing is defined and is defined.
"

Because the macro actually *is* defined: as soon as tex sees

\foo

it reserves the name and gives it the meaning undefined, so even 
\undefined is defined.


Anyway, that is why we have \ifdefined that does a different kind of 
checking. In retrospect, that is a better one, so I'll adapt that in lmtx.


\starttext
  \let\MyMacroA\undefined

  \startluacode
local function whatever(s)
context.type("\\" .. s)
context(" is " .. (tokens.defined(s,true) and "defined" or 
"undefined")) --% Hans' way
context(" and has meaning " .. (tokens.defined(s) and "defined" 
or "undefined")) --% Hans' way

context.par()
end

whatever("MyMacroA")
whatever("MyMacroB")
  \stopluacode

\stoptext

\MyMacroA is defined and has meaning undefined
\MyMacroB is undefined and has meaning undefined


You can do this in current luatex/mkiv:

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

Hans


-
  Hans Hagen | PRAGMA ADE
  Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
   tel: 038 477 53 69 | www.pragma-ade.nl | www.pragma-pod.nl
-
___
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
___

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

2020-05-28 Thread context


Hello,

one more question - why macros \Undefined and \DoNothing show "defined" 
although I (tried to) undefine them?



\starttext
  \def\MyMacro{Ahoj}
  \def\MyMac#1#2{Something}

  \def\Undefined{}
  \let\Undefined\undefined

  \def\DoNothing{}
  \let\DoNothing\donothing

  \startluacode
local str = { [true] = "defined", [false] = "undefined" }

local function whatever(s)
  context.type("\\" .. s)
  context(" is " .. (tokens.defined(s) and "defined" or 
"undefined")) --% Hans' way
  context(" and is " .. str[token.is_defined(s)] .. ".") --% Henri's 
way

  context.par()
end

whatever("MyMacro")
whatever("MyMacroD")
whatever(" ")
whatever("-")
whatever("Undefined")
whatever("DoNothing")
  \stopluacode

  %\Undefined % Causes "! Undefined control sequence"
\stoptext


Gives:

"
\MyMacro is defined and is defined.
\MyMacroD is undefined and is undefined.
\ is defined and is defined.
\- is defined and is defined.
\Undefined is defined and is defined.
\DoNothing is defined and is defined.
"

Lukas
___
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
___

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

2020-05-28 Thread context


Hello,

thanks Henri and Hans for all solutions!

On 2020-05-28 10:34, Hans Hagen wrote:

On 5/28/2020 12:42 AM, cont...@vivaldi.net wrote:

Hello,

is it possible to check whether a macro exists (or - is it a 
non-\undefined control sequence) with Lua? Suppose:



\starttext
   \def\MyMacro{Ahoj}
   \def\MyMac#1#2{Something}

   \startluacode
     IsDefined = function(ctl_seq)
   print("CS " .. ctl_seq ..
     (tex.IsCS(ctl_seq) -- Or what to come 
here?
    "is defined" or 
"is unknown") .. ".")

     end

     -- So the function should print to the console:

     IsDefined("MyMacro") --> "CS MyMacro is defined."
     IsDefined("MyMac") --> "CS MyMac is defined."
     IsDefined("bf") --> "CS bf is defined."
     IsDefined("dummy") --> "CS dummy is unknown."

   \stopluacode
\stoptext


Is it possible?

A lot is possible. Take this:

   \def\MyMacroA{Ahoj A}
\unexpanded\def\MyMacroB{Ahoj B}
\frozen\def\MyMacroC{Ahoj C} % in lmtx
 % \def\MyMacroC{Ahoj C} % barks

At the tex end you can check for several properties:

\ifusercmd \hbox Y\else N\fi % in lmtx
\iffrozen  \hbox Y\else N\fi % in lmtx
\ifusercmd \MyMacroA Y\else N\fi % in lmtx
\iffrozen  \MyMacroA Y\else N\fi % in lmtx
\iffrozen  \MyMacroC Y\else N\fi % in lmtx

At the Lua end you can check for being defined:

\startluacode
local function whatever(s)
context.type("\\" .. s)
context(" is %s", tokens.defined(s) and "defined" or 
"undefined")

context.par()
end
whatever("MyMacroA")
whatever("MyMacroD")
whatever(" ")
whatever("-")
\stopluacode

alternatively you can say:

\startluacode
   local t = token.create("MyMacro")
   print(t.cmdname == "undefined_cs")
\stopluacode

which is less efficient unless you want to access more properties.

Hans


(@Hans: I'm using vivaldi's mail account in "good will" - I didn't 
suppose it would cause any unwanted actions, like resending mails or 
whatever.)


Bets regards,

Lukas
___
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
___

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

2020-05-28 Thread Hans Hagen


On 5/28/2020 12:42 AM, cont...@vivaldi.net wrote:

Hello,

is it possible to check whether a macro exists (or - is it a 
non-\undefined control sequence) with Lua? Suppose:



\starttext
   \def\MyMacro{Ahoj}
   \def\MyMac#1#2{Something}

   \startluacode
     IsDefined = function(ctl_seq)
   print("CS " .. ctl_seq ..
     (tex.IsCS(ctl_seq) -- Or what to come 
here?
    "is defined" or "is 
unknown") .. ".")

     end

     -- So the function should print to the console:

     IsDefined("MyMacro") --> "CS MyMacro is defined."
     IsDefined("MyMac") --> "CS MyMac is defined."
     IsDefined("bf") --> "CS bf is defined."
     IsDefined("dummy") --> "CS dummy is unknown."

   \stopluacode
\stoptext


Is it possible?

A lot is possible. Take this:

   \def\MyMacroA{Ahoj A}
\unexpanded\def\MyMacroB{Ahoj B}
\frozen\def\MyMacroC{Ahoj C} % in lmtx
 % \def\MyMacroC{Ahoj C} % barks

At the tex end you can check for several properties:

\ifusercmd \hbox Y\else N\fi % in lmtx
\iffrozen  \hbox Y\else N\fi % in lmtx
\ifusercmd \MyMacroA Y\else N\fi % in lmtx
\iffrozen  \MyMacroA Y\else N\fi % in lmtx
\iffrozen  \MyMacroC Y\else N\fi % in lmtx

At the Lua end you can check for being defined:

\startluacode
local function whatever(s)
context.type("\\" .. s)
context(" is %s", tokens.defined(s) and "defined" or "undefined")
context.par()
end
whatever("MyMacroA")
whatever("MyMacroD")
whatever(" ")
whatever("-")
\stopluacode

alternatively you can say:

\startluacode
   local t = token.create("MyMacro")
   print(t.cmdname == "undefined_cs")
\stopluacode

which is less efficient unless you want to access more properties.

Hans

-
  Hans Hagen | PRAGMA ADE
  Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
   tel: 038 477 53 69 | www.pragma-ade.nl | www.pragma-pod.nl
-
___
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
___

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

2020-05-28 Thread Hans Hagen


On 5/28/2020 12:49 AM, luigi scarso wrote:



On Thu, May 28, 2020 at 12:43 AM > wrote:


Off-topic:
your email are always marked as spam by my gmail . Are you sure that 
your address setup is ok  ?
also, a reply to that vivaldi address always bounces (same for gmx 
accounts, so don't expect answers to those adresses)


Hans

-
  Hans Hagen | PRAGMA ADE
  Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
   tel: 038 477 53 69 | www.pragma-ade.nl | www.pragma-pod.nl
-
___
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
___

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

2020-05-28 Thread Henri Menke

On 28/05/20, 00:42, cont...@vivaldi.net wrote:
> Hello,
> 
> is it possible to check whether a macro exists (or - is it a non-\undefined
> control sequence) with Lua? Suppose:
> 
> 
> \starttext
>   \def\MyMacro{Ahoj}
>   \def\MyMac#1#2{Something}
> 
>   \startluacode
> IsDefined = function(ctl_seq)
>   print("CS " .. ctl_seq ..
> (tex.IsCS(ctl_seq) -- Or what to come here?
>"is defined" or "is
> unknown") .. ".")
> end
> 
> -- So the function should print to the console:
> 
> IsDefined("MyMacro") --> "CS MyMacro is defined."
> IsDefined("MyMac") --> "CS MyMac is defined."
> IsDefined("bf") --> "CS bf is defined."
> IsDefined("dummy") --> "CS dummy is unknown."
> 
>   \stopluacode
> \stoptext
> 
> 
> Is it possible?

Yes, that is what the token library is there for.

\starttext

\def\MyMacro{Ahoj}
\def\MyMac#1#2{Something}

\startluacode
local str = { [true] = "defined", [false] = "undefined" }
for _, macro in ipairs({ "MyMacro", "MyMac", "bf", "dummy" }) do
context(macro .. " is " .. str[token.is_defined(macro)] .. "\\par")
end
\stopluacode

\stoptext

Cheers, Henri

> 
> Best regards,
> 
> Lukas
> ___
> 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
> ___
___
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
___

[NTG-context] Checking existence of a macro (control sequence) by Lua

2020-05-27 Thread context


Hello,

is it possible to check whether a macro exists (or - is it a 
non-\undefined control sequence) with Lua? Suppose:



\starttext
  \def\MyMacro{Ahoj}
  \def\MyMac#1#2{Something}

  \startluacode
IsDefined = function(ctl_seq)
  print("CS " .. ctl_seq ..
(tex.IsCS(ctl_seq) -- Or what to come 
here?
   "is defined" or "is 
unknown") .. ".")

end

-- So the function should print to the console:

IsDefined("MyMacro") --> "CS MyMacro is defined."
IsDefined("MyMac") --> "CS MyMac is defined."
IsDefined("bf") --> "CS bf is defined."
IsDefined("dummy") --> "CS dummy is unknown."

  \stopluacode
\stoptext


Is it possible?

Best regards,

Lukas
___
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
___

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

2020-05-27 Thread luigi scarso

On Thu, May 28, 2020 at 12:43 AM  wrote:

> Off-topic:
your email are always marked as spam by my gmail . Are you sure that your
address setup is ok  ?

-- 
luigi
___
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
___

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua - problem after updating MkIV

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua - problem after updating MkIV

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua - problem after updating MkIV

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua - problem after updating MkIV

[NTG-context] Checking existence of a macro (control sequence) by Lua - problem after updating MkIV

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

[NTG-context] Checking existence of a macro (control sequence) by Lua

Re: [NTG-context] Checking existence of a macro (control sequence) by Lua

14 matches

Site Navigation

Mail list logo

Footer information