From fdc64c2abcdf53d9afee4541503d1d17763ee92c Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sat, 27 Dec 2008 02:20:07 +0000
Subject: 	* algebra/net.spad.pamphlet (readBytes!$InputByteConduit): Set
 	length of buffer to count of bytes read. 	*
 algebra/si.spad.pamphlet (SingleInteger): Now formally subdomain 	of
 Integer.

---
 src/algebra/strap/LIST.lsp | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src/algebra/strap/LIST.lsp')

diff --git a/src/algebra/strap/LIST.lsp b/src/algebra/strap/LIST.lsp
index 8e1a47d8..55078e68 100644
--- a/src/algebra/strap/LIST.lsp
+++ b/src/algebra/strap/LIST.lsp
@@ -155,7 +155,7 @@
            (EXIT |lu|))))) 
 
 (DEFUN |LIST;convert;$If;13| (|x| $)
-  (PROG (#0=#:G1442 |a| #1=#:G1443)
+  (PROG (#0=#:G1444 |a| #1=#:G1445)
     (RETURN
       (SEQ (SPADCALL
                (CONS (SPADCALL
@@ -182,10 +182,10 @@
                             (GO G190) G191 (EXIT (NREVERSE0 #0#)))))
                (|getShellEntry| $ 43)))))) 
 
-(DEFUN |List| (#0=#:G1444)
+(DEFUN |List| (#0=#:G1446)
   (PROG ()
     (RETURN
-      (PROG (#1=#:G1445)
+      (PROG (#1=#:G1447)
         (RETURN
           (COND
             ((LETT #1#
-- 
cgit v1.2.3