[Scsh-checkins] CVS: scsh-0.6/scsh/lib list-pack.scm,1.3,1.4

[Martin Gasbichler <mainzelm@users.sourceforge.net>]

Update of /cvsroot/scsh/scsh-0.6/scsh/lib
In directory usw-pr-cvs1:/tmp/cvs-serv13184

Modified Files:
        list-pack.scm 
Log Message:
Fixed bug in type of MAP & FOR-EACH.


Index: list-pack.scm
===================================================================
RCS file: /cvsroot/scsh/scsh-0.6/scsh/lib/list-pack.scm,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** list-pack.scm       1999/10/05 18:49:20     1.3
--- list-pack.scm       2001/01/11 09:18:52     1.4
***************
*** 176,181 ****
  
     ;; Extended from their R4RS definitions.
!    (map (proc ((proc (:value) :value) &rest :value) :value))
!    (for-each (proc ((proc (:value) :values) &rest :value) :unspecific))
  
     ;; R4RS exports
--- 176,181 ----
  
     ;; Extended from their R4RS definitions.
!    (map      (proc ((proc (:value &rest :value) :value)  :value &rest :value) 
:value))
!    (for-each (proc ((proc (:value &rest :value) :values) :value &rest :value) 
:unspecific))
  
     ;; R4RS exports