mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-14 07:30:32 +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

10
libguile/strings.c
View file

@ -1833,8 +1833,8 @@ scm_i_deprecated_string_chars (SCM str)
null-terminated.
*/
if (IS_SH_STRING (str))
scm_misc_error (NULL,
"SCM_STRING_CHARS does not work with shared substrings.",
scm_misc_error (NULL,
"SCM_STRING_CHARS does not work with shared substrings",
SCM_EOL);
/* We explicitly test for read-only strings to produce a better
@ -1842,10 +1842,10 @@ scm_i_deprecated_string_chars (SCM str)
*/
if (IS_RO_STRING (str))
scm_misc_error (NULL,
"SCM_STRING_CHARS does not work with read-only strings.",
scm_misc_error (NULL,
"SCM_STRING_CHARS does not work with read-only strings",
SCM_EOL);
/* The following is still wrong, of course...
*/
str = scm_i_string_start_writing (str);