From 4d8ffa43c8683512dac87eea5c636f4ffbdbc5f5 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Tue, 3 Dec 2013 08:16:53 -0800
Subject: [PATCH] delete auto resource releasing facility

---
 src/gc.c | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/src/gc.c b/src/gc.c
index 8049a2af..b931bf75 100644
--- a/src/gc.c
+++ b/src/gc.c
@@ -501,10 +501,6 @@ gc_finalize_object(pic_state *pic, struct pic_object *obj)
     break;
   }
   case PIC_TT_PORT: {
-    struct pic_port *port = (struct pic_port *)obj;
-    if (port->status == PIC_PORT_OPEN) {
-      fclose(port->file);
-    }
     break;
   }
   case PIC_TT_ERROR: {