mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-17 09:10:22 +02:00
Code Activity

Fix stylistic issues revealed by "make syntax-check".

Browse source 
* libguile/gc-malloc.c (scm_must_free): Remove unnecessary `if' before
  `free ()'.

* libguile/stime.c (scm_localtime, scm_mktime): Likewise.

* libguile/eval.i.c (ceval): Don't cast the result of alloca(3).

* libguile/i18n.c (SCM_STRING_TO_U32_BUF): Likewise.

* test-suite/standalone/test-unwind.c: Likewise.

* libguile/strings.c (scm_i_deprecated_string_chars): Don't end error
  message in period.
This commit is contained in:
Ludovic Courtès 2009-11-17 23:07:10 +01:00
parent c84bdaf6b4
commit c291b58835
6 changed files with 15 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

9
libguile/gc-malloc.c
View file

@ -322,13 +322,8 @@ scm_must_free (void *obj)
#ifdef GUILE_DEBUG_MALLOC
scm_malloc_unregister (obj);
#endif
if (obj)
free (obj);
else
{
fprintf (stderr,"freeing NULL pointer");
abort ();
}
free (obj);
}
#undef FUNC_NAME