From ddba4e6d835e6b042ff7c84878730b66f59aa433 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 9 Jul 2019 19:53:32 -0400
Subject: [PATCH] Fix stupid typo in reader.

---
 src/runtime/reader.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/runtime/reader.scm b/src/runtime/reader.scm
index a464e19e1..8eb447028 100644
--- a/src/runtime/reader.scm
+++ b/src/runtime/reader.scm
@@ -566,7 +566,7 @@ USA.
 
 (define (handler:close-bracket db ctx char)
   db
-  (if (close-bracket-ok? ctx)
+  (if (not (close-bracket-ok? ctx))
       (error:unbalanced-close char))
   (close-bracket-token))
 
-- 
2.25.1