diff --git a/scheme/file.sld b/scheme/file.sld
index 277c6365..328d2b3a 100644
--- a/scheme/file.sld
+++ b/scheme/file.sld
@@ -2,6 +2,8 @@
   (export
     call-with-input-file
     call-with-output-file
+    with-input-from-file
+    with-output-from-file
   )
   (import (scheme base))
   (begin
@@ -9,4 +11,6 @@
       (call-with-port (open-input-file string) proc))
     (define (call-with-output-file string proc)
       (call-with-port (open-output-file string) proc))
+    TODO: with-input-from-file
+    TODO: with-output-from-file
 ))