From f29c37cd1b37edbc6d50181a2bbc5c6cf135dca6 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Thu, 11 Dec 2008 22:56:13 +0000
Subject:  r12440@gauss:  gdr | 2008-12-11 05:38:58 -0600  	Tidy
 resolveNiladicConstructors.

---
 src/interp/nrunfast.boot | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/interp/nrunfast.boot b/src/interp/nrunfast.boot
index d3c03015..fa3f742c 100644
--- a/src/interp/nrunfast.boot
+++ b/src/interp/nrunfast.boot
@@ -597,9 +597,9 @@ resolveNiladicConstructors form ==
   IDENTP form and niladicConstructorFromDB form => [form]
   atom form => form
   form is ["QUOTE",:.] => form
-  for args in tails rest type repeat
+  for args in tails rest form repeat
     rplac(first args, resolveNiladicConstructors first args)
-  type
+  form
 
 --=======================================================
 --                   HasCategory/Attribute
-- 
cgit v1.2.3