merge from 1.8 branch
authorKevin Ryde <user42@zip.com.au>
Sun, 16 Apr 2006 23:43:48 +0000 (23:43 +0000)
committerKevin Ryde <user42@zip.com.au>
Sun, 16 Apr 2006 23:43:48 +0000 (23:43 +0000)
60 files changed:
ice-9/ChangeLog
ice-9/Makefile.am
ice-9/and-let-star.scm
ice-9/arrays.scm
ice-9/boot-9.scm
ice-9/buffered-input.scm
ice-9/calling.scm
ice-9/channel.scm
ice-9/common-list.scm
ice-9/debug.scm
ice-9/debugger.scm
ice-9/debugger/Makefile.am
ice-9/debugger/command-loop.scm
ice-9/debugger/commands.scm
ice-9/debugger/state.scm
ice-9/debugger/trc.scm
ice-9/documentation.scm
ice-9/emacs.scm
ice-9/expect.scm
ice-9/format.scm
ice-9/ftw.scm
ice-9/gap-buffer.scm
ice-9/getopt-long.scm
ice-9/hcons.scm
ice-9/history.scm
ice-9/lineio.scm
ice-9/list.scm
ice-9/ls.scm
ice-9/mapping.scm
ice-9/match.scm
ice-9/networking.scm
ice-9/null.scm
ice-9/occam-channel.scm
ice-9/optargs.scm
ice-9/poe.scm
ice-9/popen.scm
ice-9/posix.scm
ice-9/pretty-print.scm
ice-9/psyntax.ss
ice-9/q.scm
ice-9/r4rs.scm
ice-9/r5rs.scm
ice-9/rdelim.scm
ice-9/receive.scm
ice-9/regex.scm
ice-9/runq.scm
ice-9/rw.scm
ice-9/safe-r5rs.scm
ice-9/safe.scm
ice-9/serialize.scm
ice-9/session.scm
ice-9/slib.scm
ice-9/stack-catch.scm
ice-9/streams.scm
ice-9/string-fun.scm
ice-9/syncase.scm
ice-9/test.scm
ice-9/threads.scm
ice-9/time.scm
ice-9/weak-vector.scm

index 00f11c6..f0e8294 100644 (file)
@@ -1,3 +1,14 @@
+2006-03-04  Ludovic Courtès  <ludovic.courtes@laas.fr>
+
+       * ice-9/boot-9.scm (make-autoload-interface): Don't call `set-car!' if
+       the autoload interface has already been removed from MODULE's uses.
+       This bug showed up when using a given module both with `autoload' and
+       `use-module'.
+
+2006-02-21  Kevin Ryde  <user42@zip.com.au>
+
+       * format.scm (format:out-dollar): Use format:out-inf-nan per ~f etc.
+
 2006-02-12  Marius Vollmer  <mvo@zagadka.de>
 
        * deprecated.scm (make-uniform-array): Don't pass the prototype as
index 91e8277..7341855 100644 (file)
@@ -1,6 +1,6 @@
 ## Process this file with automake to produce Makefile.in.
 ##
-##   Copyright (C) 1998,1999,2000,2001,2003, 2004 Free Software Foundation, Inc.
+##   Copyright (C) 1998,1999,2000,2001,2003, 2004, 2006 Free Software Foundation, Inc.
 ##
 ##   This file is part of GUILE.
 ##
index 7a73801..b8cb2a6 100644 (file)
@@ -1,7 +1,7 @@
 ;;;; and-let-star.scm --- and-let* syntactic form (draft SRFI-2) for Guile
 ;;;; written by Michael Livshin <mike@olan.com>
 ;;;;
-;;;;   Copyright (C) 1999, 2001, 2004 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1999, 2001, 2004, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index c268ced..7ddcc8a 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;; Copyright (C) 1999, 2001, 2004 Free Software Foundation, Inc.
+;;;; Copyright (C) 1999, 2001, 2004, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This program is free software; you can redistribute it and/or modify
 ;;;; it under the terms of the GNU General Public License as published by
index 7da005c..0f56f98 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;; Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002,2003,2004,2005
+;;;; Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002,2003,2004,2005,2006
 ;;;; Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
                  (let ((i (module-public-interface (resolve-module name))))
                    (if (not i)
                        (error "missing interface for module" name))
-                   ;; Replace autoload-interface with interface
-                   (set-car! (memq a (module-uses module)) i)
+                   (let ((autoload (memq a (module-uses module))))
+                     ;; Replace autoload-interface with actual interface if
+                     ;; that has not happened yet.
+                     (if (pair? autoload)
+                         (set-car! autoload i)))
                    (module-local-variable i sym))))))
     (module-constructor (make-hash-table 0) '() b #f #f name 'autoload #f #f
                        '() (make-weak-value-hash-table 31) 0)))
index 3942ccd..11530e8 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; buffered-input.scm --- construct a port from a buffered input reader
 ;;;;
-;;;;   Copyright (C) 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index d60e52a..07f7a78 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; calling.scm --- Calling Conventions
 ;;;;
-;;;;   Copyright (C) 1995, 1996, 1997, 2000, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1995, 1996, 1997, 2000, 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 79481d4..8cbb001 100644 (file)
@@ -1,6 +1,6 @@
 ;;; Guile object channel
 
-;; Copyright (C) 2001 Free Software Foundation, Inc.
+;; Copyright (C) 2001, 2006 Free Software Foundation, Inc.
 
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index 29b25b1..7d62bc3 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; common-list.scm --- COMMON LISP list functions for Scheme
 ;;;;
-;;;;   Copyright (C) 1995, 1996, 1997, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1995, 1996, 1997, 2001, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 3dd7c8c..0e75159 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 1996, 1997, 1998, 1999, 2001 Free Software Foundation
+;;;;   Copyright (C) 1996, 1997, 1998, 1999, 2001, 2006 Free Software Foundation
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index da14049..0ad0148 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; Guile Debugger
 
-;;; Copyright (C) 1999, 2001, 2002 Free Software Foundation, Inc.
+;;; Copyright (C) 1999, 2001, 2002, 2006 Free Software Foundation, Inc.
 ;;;
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index 42822d8..7ef09a0 100644 (file)
@@ -1,6 +1,6 @@
 ## Process this file with automake to produce Makefile.in.
 ##
-##     Copyright (C) 2002, 2004 Free Software Foundation, Inc.
+##     Copyright (C) 2002, 2004, 2006 Free Software Foundation, Inc.
 ##
 ##   This file is part of GUILE.
 ##
index 584eaab..62a08ea 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; Guile Debugger command loop
 
-;;; Copyright (C) 1999, 2001, 2002, 2003 Free Software Foundation, Inc.
+;;; Copyright (C) 1999, 2001, 2002, 2003, 2006 Free Software Foundation, Inc.
 ;;;
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index f252f0a..1d716e2 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; (ice-9 debugger commands) -- debugger commands
 
-;;; Copyright (C) 2002 Free Software Foundation, Inc.
+;;; Copyright (C) 2002, 2006 Free Software Foundation, Inc.
 ;;;
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index aa68314..11b8ebb 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; (ice-9 debugger state) -- debugger state representation
 
-;;; Copyright (C) 2002 Free Software Foundation, Inc.
+;;; Copyright (C) 2002, 2006 Free Software Foundation, Inc.
 ;;;
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index 1b7c01c..49af274 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; (ice-9 debugger trc) -- tracing for Guile debugger code
 
-;;; Copyright (C) 2002 Free Software Foundation, Inc.
+;;; Copyright (C) 2002, 2006 Free Software Foundation, Inc.
 ;;;
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index c3a47cf..4cf3263 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 2000,2001, 2002, 2003 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2000,2001, 2002, 2003, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index cadacba..12d8228 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 7490117..a024e91 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 1996, 1998, 1999, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1996, 1998, 1999, 2001, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 2a92cbf..3d17d44 100644 (file)
                  (width (format:par pars l 2 0 "width"))
                  (padch (format:par pars l 3 format:space-ch #f)))
 
-             (format:parse-float
-              (if (string? number) number (number->string number)) #t 0)
-             (if (<= (- format:fn-len format:fn-dot) digits)
-                 (format:fn-zfill #f (- digits (- format:fn-len format:fn-dot)))
-                 (format:fn-round digits))
-             (let ((numlen (+ format:fn-len 1)))
-               (if (or (not format:fn-pos?) (memq modifier '(at colon-at)))
-                   (set! numlen (+ numlen 1)))
+             (cond
+              ((or (inf? number) (nan? number))
+               (format:out-inf-nan number width digits #f #f padch))
+
+              (else
+               (format:parse-float
+                (if (string? number) number (number->string number)) #t 0)
+               (if (<= (- format:fn-len format:fn-dot) digits)
+                   (format:fn-zfill #f (- digits (- format:fn-len format:fn-dot)))
+                   (format:fn-round digits))
+               (let ((numlen (+ format:fn-len 1)))
+                 (if (or (not format:fn-pos?) (memq modifier '(at colon-at)))
+                     (set! numlen (+ numlen 1)))
+                 (if (and mindig (> mindig format:fn-dot))
+                     (set! numlen (+ numlen (- mindig format:fn-dot))))
+                 (if (and (= format:fn-dot 0) (not mindig))
+                     (set! numlen (+ numlen 1)))
+                 (if (< numlen width)
+                     (case modifier
+                       ((colon)
+                        (if (not format:fn-pos?)
+                            (format:out-char #\-))
+                        (format:out-fill (- width numlen) (integer->char padch)))
+                       ((at)
+                        (format:out-fill (- width numlen) (integer->char padch))
+                        (format:out-char (if format:fn-pos? #\+ #\-)))
+                       ((colon-at)
+                        (format:out-char (if format:fn-pos? #\+ #\-))
+                        (format:out-fill (- width numlen) (integer->char padch)))
+                       (else
+                        (format:out-fill (- width numlen) (integer->char padch))
+                        (if (not format:fn-pos?)
+                            (format:out-char #\-))))
+                     (if format:fn-pos?
+                         (if (memq modifier '(at colon-at)) (format:out-char #\+))
+                         (format:out-char #\-))))
                (if (and mindig (> mindig format:fn-dot))
-                   (set! numlen (+ numlen (- mindig format:fn-dot))))
+                   (format:out-fill (- mindig format:fn-dot) #\0))
                (if (and (= format:fn-dot 0) (not mindig))
-                   (set! numlen (+ numlen 1)))
-               (if (< numlen width)
-                   (case modifier
-                     ((colon)
-                      (if (not format:fn-pos?)
-                          (format:out-char #\-))
-                      (format:out-fill (- width numlen) (integer->char padch)))
-                     ((at)
-                      (format:out-fill (- width numlen) (integer->char padch))
-                      (format:out-char (if format:fn-pos? #\+ #\-)))
-                     ((colon-at)
-                      (format:out-char (if format:fn-pos? #\+ #\-))
-                      (format:out-fill (- width numlen) (integer->char padch)))
-                     (else
-                      (format:out-fill (- width numlen) (integer->char padch))
-                      (if (not format:fn-pos?)
-                          (format:out-char #\-))))
-                   (if format:fn-pos?
-                       (if (memq modifier '(at colon-at)) (format:out-char #\+))
-                       (format:out-char #\-))))
-             (if (and mindig (> mindig format:fn-dot))
-                 (format:out-fill (- mindig format:fn-dot) #\0))
-             (if (and (= format:fn-dot 0) (not mindig))
-                 (format:out-char #\0))
-             (format:out-substr format:fn-str 0 format:fn-dot)
-             (format:out-char #\.)
-             (format:out-substr format:fn-str format:fn-dot format:fn-len)))))
+                   (format:out-char #\0))
+               (format:out-substr format:fn-str 0 format:fn-dot)
+               (format:out-char #\.)
+               (format:out-substr format:fn-str format:fn-dot format:fn-len)))))))
 
                                        ; the flonum buffers
 
index 8e28865..09b580c 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; ftw.scm --- filesystem tree walk
 
-;;;;   Copyright (C) 2002, 2003 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2002, 2003, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index c283671..b6162e8 100644 (file)
@@ -1,6 +1,6 @@
 ;;; gap-buffer.scm --- String buffer that supports point
 
-;;;    Copyright (C) 2002, 2003 Free Software Foundation, Inc.
+;;;    Copyright (C) 2002, 2003, 2006 Free Software Foundation, Inc.
 ;;;
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index 04cfa91..9e39e60 100644 (file)
@@ -1,4 +1,4 @@
-;;; Copyright (C) 1998, 2001 Free Software Foundation, Inc.
+;;; Copyright (C) 1998, 2001, 2006 Free Software Foundation, Inc.
 ;;;
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index 1c41e0f..6323506 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;;   Copyright (C) 1995, 1996, 1998, 2001, 2003 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1995, 1996, 1998, 2001, 2003, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 69dc177..921a257 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 2000, 2001, 2004 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2000, 2001, 2004, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index bb11bdf..f122268 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;;   Copyright (C) 1996, 1998, 2001, 2003 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1996, 1998, 2001, 2003, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 2971d76..af83d17 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; List functions not provided in R5RS or srfi-1
 
-;;; Copyright (C) 2003 Free Software Foundation, Inc.
+;;; Copyright (C) 2003, 2006 Free Software Foundation, Inc.
 ;;;
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index 2571aaa..e848be3 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; ls.scm --- functions for browsing modules
 ;;;;
-;;;;   Copyright (C) 1995, 1996, 1997, 1999, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1995, 1996, 1997, 1999, 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 06c3506..c4ef4fe 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;;   Copyright (C) 1996, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1996, 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index a5576d7..2e10c39 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;;   Copyright (C) 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2001, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 364eccf..c021882 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;; Copyright (C) 1999, 2005 Free Software Foundation, Inc.
+;;;; Copyright (C) 1999, 2005, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 4e69235..b9212e6 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 2000, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2000, 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 1873365..e28f73d 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; Occam-like channels
 
-;;; Copyright (C) 2003 Free Software Foundation, Inc.
+;;; Copyright (C) 2003, 2006 Free Software Foundation, Inc.
 ;;;
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index 40f0525..99329c7 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; optargs.scm -- support for optional arguments
 ;;;;
-;;;;   Copyright (C) 1997, 1998, 1999, 2001, 2002, 2004 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1997, 1998, 1999, 2001, 2002, 2004, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 3f54b56..fe963db 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;;   Copyright (C) 1996, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1996, 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 5a643e5..275faaa 100644 (file)
@@ -1,6 +1,6 @@
 ;; popen emulation, for non-stdio based ports.
 
-;;;; Copyright (C) 1998, 1999, 2000, 2001, 2003 Free Software Foundation, Inc.
+;;;; Copyright (C) 1998, 1999, 2000, 2001, 2003, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 1ec8b7b..53d01a0 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;; Copyright (C) 1999 Free Software Foundation, Inc.
+;;;; Copyright (C) 1999, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 673da65..bef76dd 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; -*-scheme-*-
 ;;;;
-;;;;   Copyright (C) 2001, 2004 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2001, 2004, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index a439d70..22e409d 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; -*-scheme-*-
 ;;;;
-;;;;   Copyright (C) 2001, 2003 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2001, 2003, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 2602f70..0c12d7f 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; q.scm --- Queues
 ;;;;
-;;;;   Copyright (C) 1995, 2001, 2004 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1995, 2001, 2004, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 93b0d8f..de2aeb2 100644 (file)
@@ -1,7 +1,7 @@
 ;;;; r4rs.scm --- definitions needed for libguile to be R4RS compliant
 ;;;; Jim Blandy <jimb@cyclic.com> --- October 1996
 
-;;;;   Copyright (C) 1996, 1997, 1998, 2000, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1996, 1997, 1998, 2000, 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index bd2b212..2b40515 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 2000, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2000, 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index e5b040c..d21d45c 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;; Copyright (C) 1997, 1999, 2000, 2001 Free Software Foundation, Inc.
+;;;; Copyright (C) 1997, 1999, 2000, 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 1b7bbdc..693dfe3 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; SRFI-8
 
-;;; Copyright (C) 2000, 2001, 2004 Free Software Foundation, Inc.
+;;; Copyright (C) 2000, 2001, 2004, 2006 Free Software Foundation, Inc.
 ;;;
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index 04e2183..21beb16 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 1997, 1999, 2001, 2004, 2005 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1997, 1999, 2001, 2004, 2005, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 6cbbec6..6ac4e57 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; runq.scm --- the runq data structure
 ;;;;
-;;;;   Copyright (C) 1996, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1996, 2001, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index ba9baa8..2731e88 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;; Copyright (C) 2001 Free Software Foundation, Inc.
+;;;; Copyright (C) 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index d6008e0..13a44d2 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 2000, 2001, 2004 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2000, 2001, 2004, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index c5b6e15..15b7799 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 2000, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2000, 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index b40c626..3c70f44 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 2003 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2003, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 514493f..1c9f480 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 1997, 2000, 2001, 2003 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1997, 2000, 2001, 2003, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 22143c4..a63edb6 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; slib.scm --- definitions needed to get SLIB to work with Guile
 ;;;;
-;;;;   Copyright (C) 1997, 1998, 2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1997, 1998, 2000, 2001, 2002, 2003, 2004, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index a706727..81faca0 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;;   Copyright (C) 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 6aabfb1..317d472 100644 (file)
@@ -1,7 +1,7 @@
 ;;;; streams.scm --- general lazy streams
 ;;;; -*- Scheme -*-
 
-;;;; Copyright (C) 1999, 2001, 2004 Free Software Foundation, Inc.
+;;;; Copyright (C) 1999, 2001, 2004, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 52096f6..590a7d2 100644 (file)
@@ -1,6 +1,6 @@
 ;;;; string-fun.scm --- string manipulation functions
 ;;;;
-;;;;   Copyright (C) 1995, 1996, 1997, 1999, 2001 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1995, 1996, 1997, 1999, 2001, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 56f2995..6ee4d16 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 1997, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1997, 2000, 2001, 2002, 2003, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 956427a..bed39b6 100644 (file)
@@ -1,4 +1,4 @@
-;; Copyright (C) 1991, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
+;; Copyright (C) 1991, 1992, 1993, 1994, 1995, 2006 Free Software Foundation, Inc.
 ;; 
 ;; This library is free software; you can redistribute it and/or
 ;; modify it under the terms of the GNU Lesser General Public
index 4f613c0..74021dc 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 1996, 1998, 2001, 2002, 2003 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1996, 1998, 2001, 2002, 2003, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 950e109..a704596 100644 (file)
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 2001, 2004 Free Software Foundation, Inc.
+;;;;   Copyright (C) 2001, 2004, 2006 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
index 66a7ed5..92d40d8 100644 (file)
@@ -1,6 +1,6 @@
 ;;; installed-scm-file
 
-;;;; Copyright (C) 2003 Free Software Foundation, Inc.
+;;;; Copyright (C) 2003, 2006 Free Software Foundation, Inc.
 ;;;; 
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public