a couple of name changes for consistency with ! -> _x

diff --git a/NEWS b/NEWS
index 17bf1fb..4802adc 100644 (file)
--- a/NEWS
+++ b/NEWS
@@ -298,8 +298,8 @@ output port.  Corresponds to the scheme level `write'.
 
 Several major changes.  In particular, gh_vector() now resembles
 (vector ...) (with a caveat -- see manual), and gh_make_vector() now
-exists and behaves like (make-vector ...).  gh_vref() and gh_vset()
-have been renamed gh_vector_set() and gh_vector_ref().  Some missing
+exists and behaves like (make-vector ...).  gh_vset() and gh_vref()
+have been renamed gh_vector_set_x() and gh_vector_ref().  Some missing
 vector-related gh_ functions have been implemented.
 
 ** pair and list routines

diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index 8963c7b..7d37dbe 100644 (file)
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,12 @@
+1997-10-20  Mark Galassi  <rosalia@nis.lanl.gov>
+
+       * gh.h: gh_vector_set -> gh_vector_set_x
+
+1997-10-20  Mark Galassi  <rosalia@nis.lanl.gov>
+
+       * gh_data.c (gh_vector_set_x): changed name to make it consistent
+       with the ! -> _x mapping when going from Scheme to C.
+
 1997-10-19  Mark Galassi  <rosalia@cygnus.com>
 
        * gh.h (gh_reverse): 

diff --git a/libguile/gh.h b/libguile/gh.h
index bc7dc01..3ce1532 100644 (file)
--- a/libguile/gh.h
+++ b/libguile/gh.h
@@ -157,7 +157,7 @@ SCM gh_define(char *name, SCM val);
 SCM gh_make_vector(SCM length, SCM val);
 SCM gh_vset(SCM vec, SCM pos, SCM val);
 SCM gh_vref(SCM vec, SCM pos);
-SCM gh_vector_set(SCM vec, SCM pos, SCM val);
+SCM gh_vector_set_x(SCM vec, SCM pos, SCM val);
 SCM gh_vector_ref(SCM vec, SCM pos);
 unsigned long gh_vector_length(SCM v);
 #define gh_list_to_vector(ls) scm_vector(ls)

diff --git a/libguile/gh_data.c b/libguile/gh_data.c
index 15d9afe..1be6a67 100644 (file)
--- a/libguile/gh_data.c
+++ b/libguile/gh_data.c
@@ -276,7 +276,7 @@ gh_make_vector (SCM len, SCM fill)
 
 /* set the given element of the given vector to the given value */
 SCM 
-gh_vector_set (SCM vec, SCM pos, SCM val)
+gh_vector_set_x (SCM vec, SCM pos, SCM val)
 {
   return scm_vector_set_x (vec, pos, val);
 }