guile/guile-core/guile-readline ChangeLog readl...

[Martin Grabmueller]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Martin Grabmueller <address@hidden>     01/05/23 23:51:42

Modified files:
        guile-core/guile-readline: ChangeLog readline.c readline.h 

Log message:
        Make it compile with --disable-deprecated.
        
        * readline.h: scm_option->scm_option_t.
        
        * readline.c (stream_from_fport): scm_fport->scm_fport_t;
        scm_option->scm_option_t.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/guile-readline/ChangeLog.diff?cvsroot=OldCVS&tr1=1.55&tr2=1.56&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/guile-readline/readline.c.diff?cvsroot=OldCVS&tr1=1.33&tr2=1.34&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/guile-readline/readline.h.diff?cvsroot=OldCVS&tr1=1.6&tr2=1.7&r1=text&r2=text

Patches:
Index: guile/guile-core/guile-readline/ChangeLog
diff -u guile/guile-core/guile-readline/ChangeLog:1.55 
guile/guile-core/guile-readline/ChangeLog:1.56
--- guile/guile-core/guile-readline/ChangeLog:1.55      Wed May 23 17:50:42 2001
+++ guile/guile-core/guile-readline/ChangeLog   Wed May 23 23:51:42 2001
@@ -1,3 +1,12 @@
+2001-05-24  Martin Grabmueller  <address@hidden>
+
+       Make it compile with --disable-deprecated.
+
+       * readline.h: scm_option->scm_option_t.
+
+       * readline.c (stream_from_fport): scm_fport->scm_fport_t;
+       scm_option->scm_option_t.
+
 2001-05-23  Michael Livshin  <address@hidden>
 
        * readline.c (strdup): make `len' a size_t.
Index: guile/guile-core/guile-readline/readline.c
diff -u guile/guile-core/guile-readline/readline.c:1.33 
guile/guile-core/guile-readline/readline.c:1.34
--- guile/guile-core/guile-readline/readline.c:1.33     Wed May 23 17:50:42 2001
+++ guile/guile-core/guile-readline/readline.c  Wed May 23 23:51:42 2001
@@ -42,7 +42,7 @@
 #include "libguile/validate.h"
 #include "guile-readline/readline.h"
 
-scm_option scm_readline_opts[] = {
+scm_option_t scm_readline_opts[] = {
   { SCM_OPTION_BOOLEAN, "history-file", 1,
     "Use history file." },
   { SCM_OPTION_INTEGER, "history-length", 200,
@@ -277,7 +277,7 @@
   int fd;
   FILE *f;
 
-  fd = dup (((struct scm_fport *) SCM_STREAM (port))->fdes);
+  fd = dup (((struct scm_fport_t *) SCM_STREAM (port))->fdes);
   if (fd == -1)
     {
       --in_readline;
Index: guile/guile-core/guile-readline/readline.h
diff -u guile/guile-core/guile-readline/readline.h:1.6 
guile/guile-core/guile-readline/readline.h:1.7
--- guile/guile-core/guile-readline/readline.h:1.6      Mon Jun 12 05:28:02 2000
+++ guile/guile-core/guile-readline/readline.h  Wed May 23 23:51:42 2001
@@ -22,7 +22,7 @@
 
 #include "libguile/__scm.h"
 
-extern scm_option scm_readline_opts[];
+extern scm_option_t scm_readline_opts[];
 
 #define SCM_HISTORY_FILE_P     scm_readline_opts[0].val
 #define SCM_HISTORY_LENGTH     scm_readline_opts[1].val