mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-29 14:30:34 +02:00
Code Activity

Rename 'scm_i_get_byte_or_eof' et al; mark them as SCM_API.

Browse source 
* libguile/ports.c (scm_i_get_byte_or_eof, scm_i_peek_byte_or_eof):
  Rename to 'scm_slow_get_byte_or_eof' and 'scm_slow_peek_byte_or_eof',
  respectively.

* libguile/ports.h (scm_i_get_byte_or_eof, scm_i_peek_byte_or_eof):
  Rename to 'scm_slow_get_byte_or_eof' and 'scm_slow_peek_byte_or_eof',
  respectively, and mark them as SCM_API.

* libguile/inline.h (scm_get_byte_or_eof, scm_peek_byte_or_eof): Adjust
  to use the new names.
This commit is contained in:
Mark H Weaver 2013-04-02 19:35:43 -04:00
parent 1fa89aaf61
commit e00793d7a9
3 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/inline.h
View file

@ -102,7 +102,7 @@ scm_get_byte_or_eof (SCM port)
&& pt->read_pos < pt->read_end))
return *pt->read_pos++;
else
return scm_i_get_byte_or_eof (port);
return scm_slow_get_byte_or_eof (port);
}
/* Like `scm_get_byte_or_eof' but does not change PORT's `read_pos'. */
@ -115,7 +115,7 @@ scm_peek_byte_or_eof (SCM port)
&& pt->read_pos < pt->read_end))
return *pt->read_pos;
else
return scm_i_peek_byte_or_eof (port);
return scm_slow_peek_byte_or_eof (port);
}
SCM_INLINE_IMPLEMENTATION void

4
libguile/ports.c
View file

@ -1455,7 +1455,7 @@ scm_fill_input (SCM port)
/* Slow-path fallback for 'scm_get_byte_or_eof' in inline.h */
int
scm_i_get_byte_or_eof (SCM port)
scm_slow_get_byte_or_eof (SCM port)
{
scm_t_port *pt = SCM_PTAB_ENTRY (port);
@ -1476,7 +1476,7 @@ scm_i_get_byte_or_eof (SCM port)
/* Slow-path fallback for 'scm_peek_byte_or_eof' in inline.h */
int
scm_i_peek_byte_or_eof (SCM port)
scm_slow_peek_byte_or_eof (SCM port)
{
scm_t_port *pt = SCM_PTAB_ENTRY (port);

4
libguile/ports.h
View file

@ -328,8 +328,8 @@ scm_i_default_port_conversion_handler (void);
/* Use HANDLER as the default conversion strategy for future ports. */
SCM_INTERNAL void
scm_i_set_default_port_conversion_handler (scm_t_string_failed_conversion_handler);
SCM_INTERNAL int scm_i_get_byte_or_eof (SCM port);
SCM_INTERNAL int scm_i_peek_byte_or_eof (SCM port);
SCM_API int scm_slow_get_byte_or_eof (SCM port);
SCM_API int scm_slow_peek_byte_or_eof (SCM port);
SCM_API SCM scm_port_conversion_strategy (SCM port);
SCM_API SCM scm_set_port_conversion_strategy_x (SCM port, SCM behavior);