ntg-context - mailing list for ConTeXt users
 help / color / mirror / Atom feed
From: Hans Hagen <j.hagen@xs4all.nl>
To: mailing list for ConTeXt users <ntg-context@ntg.nl>,
	Lukas/ConTeXt <lpr.context@email.cz>
Subject: Re: Checking existence of a macro (control sequence) by Lua - problem after updating MkIV
Date: Thu, 18 Jun 2020 22:52:32 +0200	[thread overview]
Message-ID: <f96ac517-0463-74d5-2f2c-e27086708453@xs4all.nl> (raw)
In-Reply-To: <aKZ.6Ap99.6My3xehTF99.1UwoLs@seznam.cz>

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
___________________________________________________________________________________

  parent reply	other threads:[~2020-06-18 20:52 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2020-06-18  8:27 Lukas/ConTeXt
2020-06-18 10:21 ` Hans van der Meer
2020-06-18 10:29   ` Lukas/ConTeXt
2020-06-18 20:52 ` Hans Hagen [this message]
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=f96ac517-0463-74d5-2f2c-e27086708453@xs4all.nl \
    --to=j.hagen@xs4all.nl \
    --cc=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).