git » jacl.git » commit d5da4ab

diff --git a/jacl.js b/jacl.js
index 13f12a7..bcb405e 100644
--- a/jacl.js
+++ b/jacl.js
@@ -771,7 +771,7 @@ const SPECIAL_FORMS = [
   '%LAMBDA',
   '%LET',
   '%NEW',
-  '%PROG',
+  '%PROGN',
   '%SETQ',
   '%TAGBODY',
   '%GO',
@@ -1171,9 +1171,9 @@ const analyzeSpecials = new Map([
       analyzeBlock(env.withLocals(node.bindings.map(x => x[0])), node, body)
     );
   }],
-  [JACLPKG.intern('%PROG'), (env, parent, form) => {
+  [JACLPKG.intern('%PROGN'), (env, parent, form) => {
     const [, ...body] = form;
-    const node = makeNode('prog', {
+    const node = makeNode('progn', {
       env: env,
       parent: parent,
       form: form
@@ -1800,7 +1800,7 @@ const emitNode = (print, node) => {
       }
       if (context !== 'expr') print(';\n');
       break;
-    } case 'prog': {
+    } case 'progn': {
       if (context === 'expr') print('(function()');
       print('{');
       emitBlock(print, node.statements, node.ret);