summaryrefslogtreecommitdiff
path: root/libguile/print.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/print.c')
-rw-r--r--libguile/print.c20
1 files changed, 7 insertions, 13 deletions
diff --git a/libguile/print.c b/libguile/print.c
index 1a5aebe1b..f43856bbe 100644
--- a/libguile/print.c
+++ b/libguile/print.c
@@ -454,22 +454,16 @@ iprin1 (SCM exp, SCM port, scm_print_state *pstate)
/* Print the character if is graphic character. */
{
if (i<256)
- {
- /* Character is graphic. Print it. */
- scm_putc (i, port);
- }
+ /* Character is graphic. Print it. */
+ scm_putc (i, port);
else
- {
- /* Character is graphic but unrepresentable in
- this port's encoding. */
- scm_intprint (i, 8, port);
- }
+ /* Character is graphic but unrepresentable in
+ this port's encoding. */
+ scm_intprint (i, 8, port);
}
else
- {
- /* Character is a non-graphical character. */
- scm_intprint (i, 8, port);
- }
+ /* Character is a non-graphical character. */
+ scm_intprint (i, 8, port);
}
else
scm_putc (i, port);