diff options
author | Andy Wingo <wingo@pobox.com> | 2016-04-23 22:20:18 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2016-04-23 22:20:18 +0200 |
commit | 122c8e6b37ad9dd44226d66e3357802f40d75f5f (patch) | |
tree | 1231602ae6ae8ecd8d01bf611140785ae77c37b7 /libguile/ports.h | |
parent | 21650f8d52e8a42bb44c92e85b6e96da1fcf5805 (diff) | |
download | guile-122c8e6b37ad9dd44226d66e3357802f40d75f5f.tar.gz |
scm_ungetc, scm_ungets instead of _unlocked variants
* libguile/ports.h (scm_ungetc_unlocked, scm_ungets_unlocked): Remove;
replace with scm_ungetc, scm_ungets.
* libguile/ports.c (scm_ungetc, scm_ungets, scm_unread_char)
(scm_unread_string): Adapt.
* libguile/rdelim.c (scm_read_delimited_x): Use scm_ungetc.
* libguile/read.c: Unread characers with scm_ungetc, not
scm_ungetc_unlocked.
Diffstat (limited to 'libguile/ports.h')
-rw-r--r-- | libguile/ports.h | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/libguile/ports.h b/libguile/ports.h index 4d9c72b80..82b2553fe 100644 --- a/libguile/ports.h +++ b/libguile/ports.h @@ -306,9 +306,7 @@ SCM_API SCM scm_read_char (SCM port); SCM_API void scm_unget_bytes (const unsigned char *buf, size_t len, SCM port); SCM_API void scm_unget_byte (int c, SCM port); SCM_API void scm_ungetc (scm_t_wchar c, SCM port); -SCM_API void scm_ungetc_unlocked (scm_t_wchar c, SCM port); SCM_API void scm_ungets (const char *s, int n, SCM port); -SCM_API void scm_ungets_unlocked (const char *s, int n, SCM port); SCM_API SCM scm_peek_char (SCM port); SCM_API SCM scm_unread_char (SCM cobj, SCM port); SCM_API SCM scm_unread_string (SCM str, SCM port); |