*** empty log message ***

diff --git a/NEWS b/NEWS
index f6478fe..c964b0a 100644 (file)
--- a/NEWS
+++ b/NEWS
@@ -849,6 +849,11 @@ Analogously, GUILE_ISELECT was defined when the function
 scm_internal_select was provided by Guile.  This function is now
 always defined, and GUILE_ISELECT with it.
 
+** New function scm_c_port_for_each.
+
+This function is like scm_port_for_each but takes a pointer to a C
+function as the callback instead of a SCM value.
+
 ** Removed definitions: scm_lisp_nil, scm_lisp_t, s_nil_ify,
 scm_m_nil_ify, s_t_ify, scm_m_t_ify, s_0_cond, scm_m_0_cond, s_0_ify,
 scm_m_0_ify, s_1_ify, scm_m_1_ify, scm_debug_newcell,
@@ -859,26 +864,19 @@ scm_debug_newcell2, SCM_HUP_SIGNAL, SCM_INT_SIGNAL, SCM_FPE_SIGNAL,
 SCM_BUS_SIGNAL, SCM_SEGV_SIGNAL, SCM_ALRM_SIGNAL, SCM_GC_SIGNAL,
 SCM_TICK_SIGNAL, SCM_SIG_ORD, SCM_ORD_SIG, SCM_NUM_SIGS,
 *top-level-lookup-closure*, scm_top_level_lookup_closure_var,
-scm_system_transformer, scm_eval_3, scm_eval2, SCM_SETAND_CAR,
-SCM_SETOR_CAR, SCM_SETAND_CDR, SCM_SETOR_CDR, SCM_FREEP, SCM_NFREEP,
-SCM_GC8MARKP, SCM_SETGC8MARK, SCM_CLRGC8MARK, SCM_GCTYP16, SCM_GCCDR,
-scm_remember, scm_protect_object, scm_unprotect_object,
-root_module_lookup_closure, scm_sym_app, scm_sym_modules,
-module_prefix, make_modules_in_var, beautify_user_module_x_var,
-try_module_autoload_var, scm_module_full_name, scm_the_root_module,
-scm_make_module, scm_ensure_user_module, scm_load_scheme_module,
-scm_port, scm_ptob_descriptor, scm_port_rw_active,
-scm_close_all_ports_except, scm_rstate, scm_rng, scm_i_rstate,
-SCM_SLOPPY_STRINGP, SCM_RWSTRINGP, SCM_STRING_UCHARS,
-SCM_STRING_CHARS, scm_read_only_string_p, scm_makstr, scm_makfromstr,
-scm_make_shared_substring, scm_tc7_substring, SCM_SLOPPY_CONSP,
-SCM_SLOPPY_NCONSP, scm_tc7_ssymbol, scm_tc7_msymbol, scm_tcs_symbols,
-sym_huh, scm_variable_set_name_hint, scm_builtin_variable,
-SCM_VARVCELL, SCM_UDVARIABLEP, SCM_DEFVARIABLEP,
-scm_internal_with_fluids, scm_make_gsubr, scm_make_gsubr_with_generic,
-scm_create_hook, list*, SCM_LIST0, SCM_LIST1, SCM_LIST2, SCM_LIST3,
-SCM_LIST4, SCM_LIST5, SCM_LIST6, SCM_LIST7, SCM_LIST8, SCM_LIST9,
-scm_listify, scm_sloppy_memq, scm_sloppy_memv, scm_sloppy_member,
+scm_system_transformer, scm_eval_3, scm_eval2,
+root_module_lookup_closure, scm_close_all_ports_except, scm_rstate,
+scm_rng, scm_i_rstate, SCM_SLOPPY_STRINGP, SCM_RWSTRINGP,
+SCM_STRING_UCHARS, SCM_STRING_CHARS, scm_read_only_string_p,
+scm_makstr, scm_makfromstr, scm_make_shared_substring,
+scm_tc7_substring, SCM_SLOPPY_CONSP, SCM_SLOPPY_NCONSP,
+scm_tc7_ssymbol, scm_tc7_msymbol, scm_tcs_symbols, sym_huh,
+scm_variable_set_name_hint, scm_builtin_variable, SCM_VARVCELL,
+SCM_UDVARIABLEP, SCM_DEFVARIABLEP, scm_internal_with_fluids,
+scm_make_gsubr, scm_make_gsubr_with_generic, scm_create_hook, list*,
+SCM_LIST0, SCM_LIST1, SCM_LIST2, SCM_LIST3, SCM_LIST4, SCM_LIST5,
+SCM_LIST6, SCM_LIST7, SCM_LIST8, SCM_LIST9, scm_listify,
+scm_sloppy_memq, scm_sloppy_memv, scm_sloppy_member,
 scm_end_of_file_key, scm_read_and_eval_x, scm_mkbig, scm_big2inum,
 scm_adjbig, scm_normbig, scm_copybig, scm_2ulong2big, scm_dbl2big,
 scm_big2dbl, SCM_FIXNUM_BIT, scm_subr_entry, SCM_SUBR_DOC,

diff --git a/doc/ref/ChangeLog b/doc/ref/ChangeLog
index f873ed6..3559eec 100644 (file)
--- a/doc/ref/ChangeLog
+++ b/doc/ref/ChangeLog
@@ -1,3 +1,7 @@
+2003-04-30  Marius Vollmer  <marius.vollmer@uni-dortmund.de>
+
+       * posix.texi (scm_c_port_for_each): Added. 
+
 2003-04-26  Neil Jerram  <neil@ossau.uklinux.net>
 
        * scheme-data.texi (Symbol Primitives): Document scm_str2symbol

diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index c339b32..1571c3c 100644 (file)
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,10 @@
+2003-04-30  Marius Vollmer  <marius.vollmer@uni-dortmund.de>
+
+       * ports.c (scm_c_port_for_each): New function, mostly copied from
+       scm_port_for_each.
+       (scm_port_for_each): Reimplemented using scm_c_port_for_each.
+       * ports.h (scm_c_port_for_each): New prototype.
+       
 2003-04-28  Mikael Djurfeldt  <djurfeldt@nada.kth.se>
 
        * eval.c (scm_m_atdispatch): Removed until actually needed.  (This