diff options
Diffstat (limited to 'tex/context/base/mkiv/symb-run.mkiv')
-rw-r--r-- | tex/context/base/mkiv/symb-run.mkiv | 53 |
1 files changed, 53 insertions, 0 deletions
diff --git a/tex/context/base/mkiv/symb-run.mkiv b/tex/context/base/mkiv/symb-run.mkiv new file mode 100644 index 000000000..3d92c4416 --- /dev/null +++ b/tex/context/base/mkiv/symb-run.mkiv @@ -0,0 +1,53 @@ +%D \module +%D [ file=symb-run, +%D version=2010.12.08, % 1998.07.20, +%D title=\CONTEXT\ Symbol Libraries, +%D subtitle=Runtime Macros, +%D author=Hans Hagen, +%D date=\currentdate, +%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}] +%C +%C This module is part of the \CONTEXT\ macro||package and is +%C therefore copyrighted by \PRAGMA. See mreadme.pdf for +%C details. + +\startluacode + function commands.showsymbolset(collection,symbols) + if type(symbols) == "string" then + symbols = utilities.parsers.settings_to_array(symbols) + end + context.start() + context.forcesymbolset { collection } + context.starttabulate { "|lT|l|l|" } + for i=1,#symbols do + local symbol = symbols[i] + context.NC() + context(symbol) + context.NC() + context.symbol(symbol) + context.NC() + context.color ( + { "red" }, + context.nested.ruledhbox( + context.nested.color ( + { "black" }, + context.nested.symbol(symbol) + ) + ) + ) + context.NR() + end + context.stoptabulate() + context.stop() + end +\stopluacode + +\unprotect + +\unexpanded\gdef\showsymbolset + {\dosingleargument\symb_show_set} + +\gdef\symb_show_set[#1]% + {\ctxcommand{showsymbolset("#1","\symbolset{#1}")}} + +\protect \endinput |