From e21476c2cb43cbe5195c1fe152a7ff27bb126b24 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Mon, 6 Jul 2009 03:30:44 +0000
Subject: 	* interp/compiler.boot (coerceEasy): Don't pretend we can make
 	matter our of void. 	* algebra/indexedp.spad.pamphlet 
 (IndexedDirectProductAbelianMonoid): Tidy. 
 (IndexedDirectProductAbelianGroup): Likewise. 	*
 src/algebra/poly.spad.pamphlet (PolynomialRing): Fix thinko.

---
 src/interp/compiler.boot | 1 -
 1 file changed, 1 deletion(-)

(limited to 'src/interp')

diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot
index f5b1e292..386b0014 100644
--- a/src/interp/compiler.boot
+++ b/src/interp/compiler.boot
@@ -1606,7 +1606,6 @@ coerceEasy(T,m) ==
   m=$EmptyMode => T
   m=$NoValueMode or m=$Void => [T.expr,m,T.env]
   T.mode =m => T
-  T.mode =$NoValueMode => T
   T.mode =$Exit =>
       [["PROGN", T.expr, ["userError", '"Did not really exit."]],
         m,T.env]
-- 
cgit v1.2.3