From 3b75d3ea1688a163c0d3900274084698e672b625 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Mon, 21 Aug 2017 12:31:06 +0000
Subject: [PATCH] Added type checking to Cyc_io_read_line()

---
 runtime.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/runtime.c b/runtime.c
index 8a3a4564..0075bd19 100644
--- a/runtime.c
+++ b/runtime.c
@@ -6150,6 +6150,7 @@ object Cyc_io_read_line(void *data, object cont, object port)
   char buf[1024];
   //int i = 0, c;
 
+  Cyc_check_port(data, port);
   if (stream == NULL) {
     Cyc_rt_raise2(data, "Unable to read from closed port: ", port);
   }