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

style fix in read.c

Browse source 
* libguile/read.c (scm_read_sexp): No need to assign to tmp here.
This commit is contained in:
Andy Wingo 2011-07-29 09:14:04 +02:00
parent 3b08b1c24d
commit 89f886122a
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/read.c
View file

@ -408,7 +408,7 @@ scm_read_sexp (scm_t_wchar chr, SCM port)
/* See above note about scm_sym_dot. */ /* See above note about scm_sym_dot. */
if (c == '.' && scm_is_eq (scm_sym_dot, tmp)) if (c == '.' && scm_is_eq (scm_sym_dot, tmp))
{ {
SCM_SETCDR (tl, tmp = scm_read_expression (port)); SCM_SETCDR (tl, scm_read_expression (port));
c = flush_ws (port, FUNC_NAME); c = flush_ws (port, FUNC_NAME);
if (terminating_char != c) if (terminating_char != c)