summaryrefslogtreecommitdiff
path: root/libguile/procs.c
diff options
context:
space:
mode:
authorMarius Vollmer <mvo@zagadka.de>2001-06-14 19:50:43 +0000
committerMarius Vollmer <mvo@zagadka.de>2001-06-14 19:50:43 +0000
commit92c2555f6972b5fbc2236fe486e9432040b43812 (patch)
treee439c8a06c62d74e4ef377a3fbe94783f2943a90 /libguile/procs.c
parent51fa276692198eb140365f60e516fbc8ff547f10 (diff)
downloadguile-92c2555f6972b5fbc2236fe486e9432040b43812.tar.gz
replace "scm_*_t" with "scm_t_*".
Diffstat (limited to 'libguile/procs.c')
-rw-r--r--libguile/procs.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/libguile/procs.c b/libguile/procs.c
index 74f751e6c..5f23d43ed 100644
--- a/libguile/procs.c
+++ b/libguile/procs.c
@@ -60,7 +60,7 @@
/* {Procedures}
*/
-scm_subr_entry_t *scm_subr_table;
+scm_t_subr_entry *scm_subr_table;
/* libguile contained approx. 700 primitive procedures on 24 Aug 1999. */
@@ -81,8 +81,8 @@ scm_c_make_subr (const char *name, long type, SCM (*fcn) ())
long new_size = scm_subr_table_room * 3 / 2;
void *new_table
= scm_must_realloc ((char *) scm_subr_table,
- sizeof (scm_subr_entry_t) * scm_subr_table_room,
- sizeof (scm_subr_entry_t) * new_size,
+ sizeof (scm_t_subr_entry) * scm_subr_table_room,
+ sizeof (scm_t_subr_entry) * new_size,
"scm_subr_table");
scm_subr_table = new_table;
scm_subr_table_room = new_size;
@@ -160,7 +160,7 @@ scm_mark_subr_table ()
SCM
scm_makcclo (SCM proc, size_t len)
{
- scm_bits_t *base = scm_must_malloc (len * sizeof (scm_bits_t), "compiled-closure");
+ scm_t_bits *base = scm_must_malloc (len * sizeof (scm_t_bits), "compiled-closure");
unsigned long i;
SCM s;
@@ -390,8 +390,8 @@ void
scm_init_subr_table ()
{
scm_subr_table
- = ((scm_subr_entry_t *)
- scm_must_malloc (sizeof (scm_subr_entry_t) * scm_subr_table_room,
+ = ((scm_t_subr_entry *)
+ scm_must_malloc (sizeof (scm_t_subr_entry) * scm_subr_table_room,
"scm_subr_table"));
}