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: {