From 78b4bdac02e3f64db5acfa9ebdb1b88696b9a405 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Thu, 8 May 2008 07:58:35 +0000
Subject: 	* boot/translator.boot (translateToplevel): Split out of
 bpOutItem. 	(maybeExportDecl): New.

---
 src/boot/parser.boot | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/boot/parser.boot')

diff --git a/src/boot/parser.boot b/src/boot/parser.boot
index b55de2bc..129b3c91 100644
--- a/src/boot/parser.boot
+++ b/src/boot/parser.boot
@@ -451,7 +451,7 @@ bpImport() ==
 bpTypeAliasDefition() ==
   (bpTerm() or bpTrap()) and 
     bpEqKey "TDEF" and bpLogical() and
-      bpPush TypeAlias(bpPop2(), bpPop1())
+      bpPush %TypeAlias(bpPop2(), bpPop1())
 
 ++ Parse a signature declaration
 ++  Signature:
-- 
cgit v1.2.3