From 0ae14e7400b2e4a6cf76d7e185433f5f901b5592 Mon Sep 17 00:00:00 2001 From: Hans Hagen Date: Thu, 28 Jan 2021 18:40:41 +0100 Subject: 2021-01-28 18:20:00 --- tex/context/base/mkiv/syst-aux.lua | 16 +++++++++++----- 1 file changed, 11 insertions(+), 5 deletions(-) (limited to 'tex/context/base/mkiv/syst-aux.lua') diff --git a/tex/context/base/mkiv/syst-aux.lua b/tex/context/base/mkiv/syst-aux.lua index 859e40ead..2e50a9e5c 100644 --- a/tex/context/base/mkiv/syst-aux.lua +++ b/tex/context/base/mkiv/syst-aux.lua @@ -289,11 +289,17 @@ local pattern = ( spaces * ( ( P("spaces") * space / catcodes_s ) + ( P("nospaces") * space / catcodes_n ) - + ( P("global") * space / function() global = true end ) - + ( P("unexpanded") * space / function() unexpanded = true end ) - + ( P("protected") * space / function() unexpanded = true end ) - + ( P("expanded") * space / function() expanded = true end ) - + ( C(option) * space / function(s) optional = s end ) + + ( P("global") * space / function() global = true end ) + + ( P("protected") * space / function() protected = true end) + + ( P("permanent") * space ) + + ( P("expanded") * space / function() expanded = true end) + + ( P("tolerant") * space ) + + ( P("instance") * space ) + + ( P("frozen") * space ) + + ( P("mutable") * space ) + + ( P("immutable") * space ) + + ( P("unexpanded") * space / function() protected = true end) + + ( C(option) * space / function(s) optional = s end) ) )^0 * spaces * ( C((1-S(" #["))^1) ) -- cgit v1.2.3