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

Style nitpicks: space before () in function call.

Browse source
This commit is contained in:
Han-Wen Nienhuys 2008-08-21 23:16:20 -03:00
parent 103dc4d4d2
commit 1f5844000e
7 changed files with 42 additions and 42 deletions
Download patch file Download diff file Expand all files Collapse all files

6
libguile/gc-segment-table.c
View file

@ -53,7 +53,7 @@ int
scm_i_insert_segment (scm_t_heap_segment *seg)
{
size_t size = (scm_i_heap_segment_table_size + 1) * sizeof (scm_t_heap_segment *);
SCM_SYSCALL(scm_i_heap_segment_table
SCM_SYSCALL (scm_i_heap_segment_table
= ((scm_t_heap_segment **)
realloc ((char *)scm_i_heap_segment_table, size)));
@ -256,13 +256,13 @@ scm_i_all_segments_statistics (SCM tab)
unsigned long*
scm_i_segment_table_info(int* size)
scm_i_segment_table_info (int* size)
{
*size = scm_i_heap_segment_table_size;
unsigned long *bounds = malloc (sizeof (unsigned long) * *size * 2);
int i;
if (!bounds)
abort();
abort ();
for (i = *size; i-- > 0; )
{
bounds[2*i] = (unsigned long)scm_i_heap_segment_table[i]->bounds[0];