diff --git a/core/io/streams/c/c-tests.factor b/core/io/streams/c/c-tests.factor
index 6a82d6d545..657c6ccd75 100644
--- a/core/io/streams/c/c-tests.factor
+++ b/core/io/streams/c/c-tests.factor
@@ -1,5 +1,5 @@
 USING: tools.test io.files io.files.temp io io.streams.c
-io.encodings.ascii strings ;
+io.encodings.ascii strings destructors kernel ;
 IN: io.streams.c.tests
 
 [ "hello world" ] [
@@ -8,3 +8,12 @@ IN: io.streams.c.tests
     "test.txt" temp-file "rb" fopen <c-reader> stream-contents
     >string
 ] unit-test
+
+[ 0 ]
+[ "test.txt" temp-file "rb" fopen <c-reader> [ stream-tell ] [ dispose ] bi ] unit-test
+
+[ 3 ] [
+    "test.txt" temp-file "rb" fopen <c-reader>
+    3 over stream-read drop
+    [ stream-tell ] [ dispose ] bi
+] unit-test