guile/guile-core/libguile ports.h ports.c ioext...

[Marius Vollmer]

CVSROOT:        /cvs
Module name:    guile
Branch:         branch_release-1-6
Changes by:     Marius Vollmer <address@hidden> 01/08/26 14:49:32

Modified files:
        guile-core/libguile: ports.h ports.c ioext.c gc.c fports.c 

Log message:
        Replaced "scm_t_portable" with "scm_port_table" which was an artifact
        from the great "scm_*_t -> scm_t_" renaming.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/ports.h.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.77.2.1&tr2=1.77.2.2&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/ports.c.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.153.2.1&tr2=1.153.2.2&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/ioext.c.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.85.2.1&tr2=1.85.2.2&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/gc.c.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.208.2.2&tr2=1.208.2.3&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/fports.c.diff?cvsroot=OldCVS&only_with_tag=branch_release-1-6&tr1=1.100.2.1&tr2=1.100.2.2&r1=text&r2=text

Patches:
Index: guile/guile-core/libguile/fports.c
diff -u guile/guile-core/libguile/fports.c:1.101 
guile/guile-core/libguile/fports.c:1.102
--- guile/guile-core/libguile/fports.c:1.101    Mon Jul  9 00:36:47 2001
+++ guile/guile-core/libguile/fports.c  Mon Jul 16 03:22:38 2001
@@ -515,7 +515,7 @@
     {
       scm_puts (SCM_PTOBNAME (SCM_PTOBNUM (exp)), port);
       scm_putc (' ', port);
-      scm_intprint (SCM_UNPACK (SCM_CDR (exp)), 16, port);
+      scm_intprint ((scm_t_bits) SCM_PTAB_ENTRY (exp), 16, port);
     }
   scm_putc ('>', port);
   return 1;
Index: guile/guile-core/libguile/gc.c
diff -u guile/guile-core/libguile/gc.c:1.212 
guile/guile-core/libguile/gc.c:1.213
--- guile/guile-core/libguile/gc.c:1.212        Fri Aug 17 16:45:29 2001
+++ guile/guile-core/libguile/gc.c      Fri Aug 24 16:57:12 2001
@@ -1793,6 +1793,8 @@
              m += SCM_SYMBOL_LENGTH (scmptr) + 1;
              scm_must_free (SCM_SYMBOL_CHARS (scmptr));
              break;
+            case scm_tc7_variable:
+              break;
            case scm_tcs_subrs:
               /* the various "subrs" (primitives) are never freed */
              continue;
Index: guile/guile-core/libguile/ioext.c
diff -u guile/guile-core/libguile/ioext.c:1.85 
guile/guile-core/libguile/ioext.c:1.86
--- guile/guile-core/libguile/ioext.c:1.85      Tue Jul  3 08:27:56 2001
+++ guile/guile-core/libguile/ioext.c   Mon Jul  9 00:36:47 2001
@@ -39,8 +39,6 @@
  * whether to permit this exception to apply to your modifications.
  * If you do not wish that, delete this exception notice.  */
 
-/* Software engineering face-lift by Greg J. Badros, 11-Dec-1999,
-   address@hidden, http://www.cs.washington.edu/homes/gjb */
 
 
 
Index: guile/guile-core/libguile/ports.c
diff -u guile/guile-core/libguile/ports.c:1.153 
guile/guile-core/libguile/ports.c:1.154
--- guile/guile-core/libguile/ports.c:1.153     Wed Jun 27 18:11:59 2001
+++ guile/guile-core/libguile/ports.c   Mon Jul  9 00:36:47 2001
@@ -39,8 +39,6 @@
  * whether to permit this exception to apply to your modifications.
  * If you do not wish that, delete this exception notice.  */
 
-/* Software engineering face-lift by Greg J. Badros, 11-Dec-1999,
-   address@hidden, http://www.cs.washington.edu/homes/gjb */
 
 
 /* Headers.  */
Index: guile/guile-core/libguile/ports.h
diff -u guile/guile-core/libguile/ports.h:1.77 
guile/guile-core/libguile/ports.h:1.78
--- guile/guile-core/libguile/ports.h:1.77      Thu Jun 14 12:50:43 2001
+++ guile/guile-core/libguile/ports.h   Mon Jul  9 00:36:47 2001
@@ -43,8 +43,6 @@
  * whether to permit this exception to apply to your modifications.
  * If you do not wish that, delete this exception notice.  */
 
-/* Software engineering face-lift by Greg J. Badros, 11-Dec-1999,
-   address@hidden, http://www.cs.washington.edu/homes/gjb */
 
 #include "libguile/__scm.h"