diff options
author | Andy Wingo <wingo@pobox.com> | 2016-05-14 23:46:17 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2016-05-14 23:46:17 +0200 |
commit | 745cbb491806929a342c016c73afcdc117f2398b (patch) | |
tree | 83b3e4e23630eeb91a8fa16f5670b4dfb5489182 | |
parent | 556ac9777b06c0d53713752b1b3ccd6480baf118 (diff) | |
download | guile-745cbb491806929a342c016c73afcdc117f2398b.tar.gz |
Remove unused type from ports-internal
* libguile/ports-internal.h: Remove unused scm_t_port_rw_active.
* libguile/deprecated.h (scm_port_rw_active): Remove deprecation shim,
as this thing is just gone now.
-rw-r--r-- | libguile/deprecated.h | 1 | ||||
-rw-r--r-- | libguile/ports-internal.h | 6 |
2 files changed, 0 insertions, 7 deletions
diff --git a/libguile/deprecated.h b/libguile/deprecated.h index 04c540e22..592dc98d5 100644 --- a/libguile/deprecated.h +++ b/libguile/deprecated.h @@ -115,7 +115,6 @@ SCM_DEPRECATED SCM scm_internal_dynamic_wind (scm_t_guard before, #define scm_listify scm_listify__GONE__REPLACE_WITH__scm_list_n #define scm_option scm_option__GONE__REPLACE_WITH__scm_t_option #define scm_port scm_port__GONE__REPLACE_WITH__scm_t_port -#define scm_port_rw_active scm_port_rw_active__GONE__REPLACE_WITH__scm_t_port_rw_active #define scm_ptob_descriptor scm_ptob_descriptor__GONE__REPLACE_WITH__scm_t_port_type #define scm_rng scm_rng__GONE__REPLACE_WITH__scm_t_rng #define scm_rstate scm_rstate__GONE__REPLACE_WITH__scm_t_rstate diff --git a/libguile/ports-internal.h b/libguile/ports-internal.h index 161213b6f..54ce3e4b0 100644 --- a/libguile/ports-internal.h +++ b/libguile/ports-internal.h @@ -331,12 +331,6 @@ struct scm_t_port #define SCM_DECCOL(port) do {if (SCM_COL (port) > 0) SCM_COL (port) -= 1;} while (0) #define SCM_TABCOL(port) do {SCM_COL (port) += 8 - SCM_COL (port) % 8;} while (0) -typedef enum scm_t_port_rw_active { - SCM_PORT_NEITHER = 0, - SCM_PORT_READ = 1, - SCM_PORT_WRITE = 2 -} scm_t_port_rw_active; - SCM_INTERNAL scm_t_iconv_descriptors * scm_i_port_iconv_descriptors (SCM port); #endif |