From 941f5bd737803162e776c37c7a92569906a7c62c Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Tue, 15 Aug 2017 17:44:17 +0000
Subject: [PATCH] Hook up _read_character

---
 runtime.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/runtime.c b/runtime.c
index fdba1a8b..591c1baa 100644
--- a/runtime.c
+++ b/runtime.c
@@ -6145,7 +6145,8 @@ void Cyc_io_read_token(void *data, object cont, object port)
           p->col_num += 4;
         }
         return_thread_runnable(data, boolean_f);
-      // TODO: character
+      } else if (c == '\\') {
+        _read_character(data, p);
       } else if (c == 'e') {
         _read_number(data, p, 10, 1);
       } else if (c == 'i') {