guile/guile-core/oop/goops active-slot.scm comp...

[Mikael Djurfeldt]

CVSROOT:        /cvs
Module name:    guile
Branch:         branch_release-1-6
Changes by:     Mikael Djurfeldt <address@hidden>       01/10/18 15:42:22

Modified files:
        guile-core/oop/goops: active-slot.scm compile.scm 
                              composite-slot.scm describe.scm 
                              dispatch.scm old-define-method.scm 
                              save.scm util.scm 

Log message:
        * goops.scm, goops/active-slot.scm, goops/compile.scm,
        goops/composite-slot.scm, goops/describe.scm, goops/dispatch.scm,
        goops/old-define-method.scm, goops/save.scm, goops/util.scm: Move
        module the system directives `export', `export-syntax',
        `re-export' and `re-export-syntax' into the `define-module' form.
        This is the recommended way of exporting bindings.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/oop/goops/active-slot.scm.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.3&tr2=1.3.2.1&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/oop/goops/compile.scm.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.4&tr2=1.4.2.1&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/oop/goops/composite-slot.scm.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.3&tr2=1.3.2.1&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/oop/goops/describe.scm.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.3&tr2=1.3.2.1&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/oop/goops/dispatch.scm.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.4&tr2=1.4.2.1&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/oop/goops/old-define-method.scm.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.2&tr2=1.2.2.1&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/oop/goops/save.scm.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.5.2.1&tr2=1.5.2.2&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/oop/goops/util.scm.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.3.2.1&tr2=1.3.2.2&r1=text&r2=text

Patches:
Index: guile/guile-core/oop/goops/active-slot.scm
diff -u guile/guile-core/oop/goops/active-slot.scm:1.2 
guile/guile-core/oop/goops/active-slot.scm:1.3
--- guile/guile-core/oop/goops/active-slot.scm:1.2      Fri Mar  9 22:09:50 2001
+++ guile/guile-core/oop/goops/active-slot.scm  Sun Jun  3 19:32:27 2001
@@ -16,6 +16,30 @@
 ;;;; along with this software; see the file COPYING.  If not, write to
 ;;;; the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
 ;;;; Boston, MA 02111-1307 USA
+;;;;
+;;;; As a special exception, the Free Software Foundation gives permission
+;;;; for additional uses of the text contained in its release of GUILE.
+;;;;
+;;;; The exception is that, if you link the GUILE library with other files
+;;;; to produce an executable, this does not by itself cause the
+;;;; resulting executable to be covered by the GNU General Public License.
+;;;; Your use of that executable is in no way restricted on account of
+;;;; linking the GUILE library code into it.
+;;;;
+;;;; This exception does not however invalidate any other reasons why
+;;;; the executable file might be covered by the GNU General Public License.
+;;;;
+;;;; This exception applies only to the code released by the
+;;;; Free Software Foundation under the name GUILE.  If you copy
+;;;; code from other Free Software Foundation releases into a copy of
+;;;; GUILE, as the General Public License permits, the exception does
+;;;; not apply to the code that you add in this way.  To avoid misleading
+;;;; anyone as to the status of such modified files, you must delete
+;;;; this exception notice from them.
+;;;;
+;;;; If you write modifications of your own for GUILE, it is your choice
+;;;; whether to permit this exception to apply to your modifications.
+;;;; If you do not wish that, delete this exception notice.
 ;;;; 
 
 
Index: guile/guile-core/oop/goops/compile.scm
diff -u guile/guile-core/oop/goops/compile.scm:1.3 
guile/guile-core/oop/goops/compile.scm:1.4
--- guile/guile-core/oop/goops/compile.scm:1.3  Tue May 15 10:58:22 2001
+++ guile/guile-core/oop/goops/compile.scm      Sun Jun  3 19:32:27 2001
@@ -14,6 +14,30 @@
 ;;;; along with this software; see the file COPYING.  If not, write to
 ;;;; the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
 ;;;; Boston, MA 02111-1307 USA
+;;;;
+;;;; As a special exception, the Free Software Foundation gives permission
+;;;; for additional uses of the text contained in its release of GUILE.
+;;;;
+;;;; The exception is that, if you link the GUILE library with other files
+;;;; to produce an executable, this does not by itself cause the
+;;;; resulting executable to be covered by the GNU General Public License.
+;;;; Your use of that executable is in no way restricted on account of
+;;;; linking the GUILE library code into it.
+;;;;
+;;;; This exception does not however invalidate any other reasons why
+;;;; the executable file might be covered by the GNU General Public License.
+;;;;
+;;;; This exception applies only to the code released by the
+;;;; Free Software Foundation under the name GUILE.  If you copy
+;;;; code from other Free Software Foundation releases into a copy of
+;;;; GUILE, as the General Public License permits, the exception does
+;;;; not apply to the code that you add in this way.  To avoid misleading
+;;;; anyone as to the status of such modified files, you must delete
+;;;; this exception notice from them.
+;;;;
+;;;; If you write modifications of your own for GUILE, it is your choice
+;;;; whether to permit this exception to apply to your modifications.
+;;;; If you do not wish that, delete this exception notice.
 ;;;; 
 
 
Index: guile/guile-core/oop/goops/composite-slot.scm
diff -u guile/guile-core/oop/goops/composite-slot.scm:1.2 
guile/guile-core/oop/goops/composite-slot.scm:1.3
--- guile/guile-core/oop/goops/composite-slot.scm:1.2   Fri Mar  9 22:09:50 2001
+++ guile/guile-core/oop/goops/composite-slot.scm       Sun Jun  3 19:32:27 2001
@@ -16,6 +16,30 @@
 ;;;; along with this software; see the file COPYING.  If not, write to
 ;;;; the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
 ;;;; Boston, MA 02111-1307 USA
+;;;;
+;;;; As a special exception, the Free Software Foundation gives permission
+;;;; for additional uses of the text contained in its release of GUILE.
+;;;;
+;;;; The exception is that, if you link the GUILE library with other files
+;;;; to produce an executable, this does not by itself cause the
+;;;; resulting executable to be covered by the GNU General Public License.
+;;;; Your use of that executable is in no way restricted on account of
+;;;; linking the GUILE library code into it.
+;;;;
+;;;; This exception does not however invalidate any other reasons why
+;;;; the executable file might be covered by the GNU General Public License.
+;;;;
+;;;; This exception applies only to the code released by the
+;;;; Free Software Foundation under the name GUILE.  If you copy
+;;;; code from other Free Software Foundation releases into a copy of
+;;;; GUILE, as the General Public License permits, the exception does
+;;;; not apply to the code that you add in this way.  To avoid misleading
+;;;; anyone as to the status of such modified files, you must delete
+;;;; this exception notice from them.
+;;;;
+;;;; If you write modifications of your own for GUILE, it is your choice
+;;;; whether to permit this exception to apply to your modifications.
+;;;; If you do not wish that, delete this exception notice.
 ;;;; 
 
 
Index: guile/guile-core/oop/goops/describe.scm
diff -u guile/guile-core/oop/goops/describe.scm:1.2 
guile/guile-core/oop/goops/describe.scm:1.3
--- guile/guile-core/oop/goops/describe.scm:1.2 Fri Mar  9 22:09:50 2001
+++ guile/guile-core/oop/goops/describe.scm     Sun Jun  3 19:32:27 2001
@@ -16,6 +16,30 @@
 ;;;; along with this software; see the file COPYING.  If not, write to
 ;;;; the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
 ;;;; Boston, MA 02111-1307 USA
+;;;;
+;;;; As a special exception, the Free Software Foundation gives permission
+;;;; for additional uses of the text contained in its release of GUILE.
+;;;;
+;;;; The exception is that, if you link the GUILE library with other files
+;;;; to produce an executable, this does not by itself cause the
+;;;; resulting executable to be covered by the GNU General Public License.
+;;;; Your use of that executable is in no way restricted on account of
+;;;; linking the GUILE library code into it.
+;;;;
+;;;; This exception does not however invalidate any other reasons why
+;;;; the executable file might be covered by the GNU General Public License.
+;;;;
+;;;; This exception applies only to the code released by the
+;;;; Free Software Foundation under the name GUILE.  If you copy
+;;;; code from other Free Software Foundation releases into a copy of
+;;;; GUILE, as the General Public License permits, the exception does
+;;;; not apply to the code that you add in this way.  To avoid misleading
+;;;; anyone as to the status of such modified files, you must delete
+;;;; this exception notice from them.
+;;;;
+;;;; If you write modifications of your own for GUILE, it is your choice
+;;;; whether to permit this exception to apply to your modifications.
+;;;; If you do not wish that, delete this exception notice.
 ;;;; 
 
 
Index: guile/guile-core/oop/goops/dispatch.scm
diff -u guile/guile-core/oop/goops/dispatch.scm:1.4 
guile/guile-core/oop/goops/dispatch.scm:1.5
--- guile/guile-core/oop/goops/dispatch.scm:1.4 Sun Jun  3 19:32:27 2001
+++ guile/guile-core/oop/goops/dispatch.scm     Sun Jul 29 16:48:41 2001
@@ -61,7 +61,7 @@
 ;;;
 
 (define hashsets 8)
-(define hashset-index 7)
+(define hashset-index 6)
 
 (define hash-threshold 3)
 (define initial-hash-size 4) ;must be a power of 2 and >= hash-threshold
Index: guile/guile-core/oop/goops/old-define-method.scm
diff -u guile/guile-core/oop/goops/old-define-method.scm:1.1 
guile/guile-core/oop/goops/old-define-method.scm:1.2
--- guile/guile-core/oop/goops/old-define-method.scm:1.1        Fri Mar  9 
22:09:50 2001
+++ guile/guile-core/oop/goops/old-define-method.scm    Sun Jun  3 19:32:27 2001
@@ -16,6 +16,30 @@
 ;;;; along with this software; see the file COPYING.  If not, write to
 ;;;; the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
 ;;;; Boston, MA 02111-1307 USA
+;;;;
+;;;; As a special exception, the Free Software Foundation gives permission
+;;;; for additional uses of the text contained in its release of GUILE.
+;;;;
+;;;; The exception is that, if you link the GUILE library with other files
+;;;; to produce an executable, this does not by itself cause the
+;;;; resulting executable to be covered by the GNU General Public License.
+;;;; Your use of that executable is in no way restricted on account of
+;;;; linking the GUILE library code into it.
+;;;;
+;;;; This exception does not however invalidate any other reasons why
+;;;; the executable file might be covered by the GNU General Public License.
+;;;;
+;;;; This exception applies only to the code released by the
+;;;; Free Software Foundation under the name GUILE.  If you copy
+;;;; code from other Free Software Foundation releases into a copy of
+;;;; GUILE, as the General Public License permits, the exception does
+;;;; not apply to the code that you add in this way.  To avoid misleading
+;;;; anyone as to the status of such modified files, you must delete
+;;;; this exception notice from them.
+;;;;
+;;;; If you write modifications of your own for GUILE, it is your choice
+;;;; whether to permit this exception to apply to your modifications.
+;;;; If you do not wish that, delete this exception notice.
 ;;;; 
 
 
Index: guile/guile-core/oop/goops/save.scm
diff -u guile/guile-core/oop/goops/save.scm:1.5 
guile/guile-core/oop/goops/save.scm:1.6
--- guile/guile-core/oop/goops/save.scm:1.5     Sun Jun  3 19:32:27 2001
+++ guile/guile-core/oop/goops/save.scm Tue Jul 17 01:26:15 2001
@@ -48,7 +48,9 @@
   :use-module (oop goops util)
   )
 
-(export save-objects load-objects restore make-unbound
+(re-export make-unbound)
+
+(export save-objects load-objects restore
        enumerate! enumerate-component!
        write-readably write-component write-component-procedure
        literal? readable make-readable)
Index: guile/guile-core/oop/goops/util.scm
diff -u guile/guile-core/oop/goops/util.scm:1.3 
guile/guile-core/oop/goops/util.scm:1.4
--- guile/guile-core/oop/goops/util.scm:1.3     Sun Jun  3 19:32:27 2001
+++ guile/guile-core/oop/goops/util.scm Thu Jul 19 16:27:40 2001
@@ -1,4 +1,4 @@
-;;;;   Copyright (C) 1999, 2000 Free Software Foundation, Inc.
+;;;;   Copyright (C) 1999, 2000, 2001 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