diff options
author | Marius Vollmer <mvo@zagadka.de> | 2001-06-14 19:51:54 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2001-06-14 19:51:54 +0000 |
commit | 593be5d2604e838b2a3c7d4f3a6ea46f9d2890f5 (patch) | |
tree | 3ef03b7bd38380773acbc75f5801bb4f734775d2 /guile-readline/readline.c | |
parent | 92c2555f6972b5fbc2236fe486e9432040b43812 (diff) | |
download | guile-593be5d2604e838b2a3c7d4f3a6ea46f9d2890f5.tar.gz |
Replace "scm_*_t" with "scm_t_*".
Diffstat (limited to 'guile-readline/readline.c')
-rw-r--r-- | guile-readline/readline.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/guile-readline/readline.c b/guile-readline/readline.c index f5f330bca..7e0eb1460 100644 --- a/guile-readline/readline.c +++ b/guile-readline/readline.c @@ -42,7 +42,7 @@ #include "libguile/validate.h" #include "guile-readline/readline.h" -scm_option_t scm_readline_opts[] = { +scm_t_option scm_readline_opts[] = { { SCM_OPTION_BOOLEAN, "history-file", 1, "Use history file." }, { SCM_OPTION_INTEGER, "history-length", 200, @@ -147,7 +147,7 @@ redisplay () static int in_readline = 0; #ifdef USE_THREADS -static scm_mutex_t reentry_barrier_mutex; +static scm_t_mutex reentry_barrier_mutex; #endif static SCM internal_readline (SCM text); @@ -207,7 +207,7 @@ SCM_DEFINE (scm_readline, "%readline", 0, 4, 0, scm_readline_init_ports (inp, outp); ans = scm_internal_catch (SCM_BOOL_T, - (scm_catch_body_t) internal_readline, + (scm_t_catch_body) internal_readline, (void *) SCM_UNPACK (text), handle_error, 0); @@ -225,7 +225,7 @@ reentry_barrier () { int reentryp = 0; #ifdef USE_THREADS - /* We should rather use scm_mutex_try_lock when it becomes available */ + /* We should rather use scm_t_mutexry_lock when it becomes available */ scm_mutex_lock (&reentry_barrier_mutex); #endif if (in_readline) @@ -277,7 +277,7 @@ stream_from_fport (SCM port, char *mode, const char *subr) int fd; FILE *f; - fd = dup (((struct scm_fport_t *) SCM_STREAM (port))->fdes); + fd = dup (((struct scm_t_fport *) SCM_STREAM (port))->fdes); if (fd == -1) { --in_readline; |