From 3d1d8de9ec20960e8954d4a6154a02d73e71c1d1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Marcel=20Fabian=20Kr=C3=BCger?= <tex@2krueger.de>
Date: Sun, 7 Nov 2021 12:14:56 +0100
Subject: [PATCH] Better \meaning

---
 luametalatex-meaning.lua | 23 ++++++++++++-----------
 1 file changed, 12 insertions(+), 11 deletions(-)

diff --git a/luametalatex-meaning.lua b/luametalatex-meaning.lua
index 831414c..225d14f 100644
--- a/luametalatex-meaning.lua
+++ b/luametalatex-meaning.lua
@@ -15,16 +15,17 @@ lmlt.luacmd("meaning", function()
   token.put_next(primitive_meaning)
   token.skipnextexpanded()
   if peeked.parameters == 0 then
-    tex.sprint'->'
+    local stash = ''
+    if peeked.protected then
+      if token.scankeywordcs'protected' then
+        token.skipnext()
+        token.skipnext()
+        stash = stash .. '\\protected '
+        print'protected'
+      end
+    end
+    token.scankeyword'macro:'
+    tex.sprint(-2, stash)
+    tex.sprint(-2, 'macro:->')
   end
-  --[[
-  if peeked.frozen then
-    assert(token.scan_keyword'frozen' and token.scan_code(0x400))
-    tex.sprint(-2, '\\frozen ')
-  end
-  if peeked.protected then
-    assert(token.scan_keyword'protected' and token.scan_code(0x400))
-    tex.sprint(-2, '\\protected ')
-  end
-  ]]
 end, "force", "global")