mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

(scm_simple_format): Print missing part of format before ~% control.

Browse source 
Thanks to Daniel Skarda!
This commit is contained in:
Marius Vollmer 2002-06-17 23:30:20 +00:00
parent 1334c61ab0
commit ba4271760f
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
libguile/print.c
View file

@ -969,6 +969,7 @@ SCM_DEFINE (scm_simple_format, "simple-format", 2, 0, 1,
start = p + 1; start = p + 1;
continue; continue;
case '%': case '%':
scm_lfwrite (start, p - start - 1, destination);
scm_newline (destination); scm_newline (destination);
start = p + 1; start = p + 1;
continue; continue;