git » jacl.git » commit fd4932a

Intern macro lambda list keywords

author Alan Dipert
2020-06-18 05:47:40 UTC
committer Alan Dipert
2020-06-18 05:47:40 UTC
parent 60df9a06984838f632bdf2ad0737bb406e99bafa

Intern macro lambda list keywords

jacl.js +12 -1

diff --git a/jacl.js b/jacl.js
index b72b47b..55d0ede 100644
--- a/jacl.js
+++ b/jacl.js
@@ -446,7 +446,18 @@ for (const [k,v] of CLFUNCS) {
 }
 
 // Lambda list keywords
-for (const kw of ['&OPTIONAL', '&REST', '&KEY', '&ALLOW-OTHER-KEYS', '&AUX']) {
+for (const kw of [
+  // Ordinary lambda list keywords
+  '&ALLOW-OTHER-KEYS',
+  '&AUX',
+  '&KEY',
+  '&OPTIONAL',
+  '&REST',
+  // Macro lambda list keywords
+  '&BODY',
+  '&ENVIRONMENT',
+  '&WHOLE'
+]) {
   CLPKG.intern(kw);
   CLPKG.exportSymbol(kw);
 }