diff --git a/sysdep/unix/io.c b/sysdep/unix/io.c
index f465da45..7d6a6f22 100644
--- a/sysdep/unix/io.c
+++ b/sysdep/unix/io.c
@@ -50,6 +50,51 @@ random_u32(void)
   return (rand_low & 0xffff) | ((rand_high & 0xffff) << 16);
 }
 
+/*
+ *	Tracked Files
+ */
+
+struct rfile {
+  resource r;
+  FILE *f;
+};
+
+static void
+rf_free(resource *r)
+{
+  struct rfile *a = (struct rfile *) r;
+
+  fclose(a->f);
+}
+
+static void
+rf_dump(resource *r)
+{
+  struct rfile *a = (struct rfile *) r;
+
+  debug("(FILE *%p)\n", a->f);
+}
+
+static struct resclass rf_class = {
+  "FILE",
+  sizeof(struct rfile),
+  rf_free,
+  rf_dump
+};
+
+void *
+rfopen(pool *p, char *name, char *mode)
+{
+  FILE *f = fopen(name, mode);
+
+  if (f)
+    {
+      struct rfile *r = ralloc(p, &rf_class);
+      r->f = f;
+    }
+  return f;
+}
+
 /*
  *	Timers
  */