From 86e3b0fbd9ff06a10c7d140e9c1e13625ad77886 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Sat, 15 Oct 2016 18:39:49 -0400
Subject: [PATCH] Code formatting

---
 scheme/read.sld | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/scheme/read.sld b/scheme/read.sld
index 3b266a89..a546160f 100644
--- a/scheme/read.sld
+++ b/scheme/read.sld
@@ -147,8 +147,7 @@
       (comment?
        (if (eq? c #\newline)
            (begin
-              (in-port:set-lnum! ptbl 
-                (+ 1 (in-port:get-lnum ptbl)))
+              (in-port:set-lnum! ptbl (+ 1 (in-port:get-lnum ptbl)))
               (in-port:set-cnum! ptbl 0)
               (parse fp '() toks all? #f parens ptbl))
            (parse fp '() toks all? #t parens ptbl)))