1 files changed, 3 insertions, 2 deletions
diff --git a/cpp.sml b/cpp.sml
index 32fcd3c..b2762b5 100644
--- a/cpp.sml
+++ b/cpp.sml
@@ -1,10 +1,11 @@
 fun main [fname] =
 let
   val stream = Stream.streamInit fname
-  val (tkl, fileList) = Tokenizer.tokenize stream []
+  val tkl = Tokenizer.tokenize stream
+  val fileInfo = Stream.convert stream
 in
   List.app
-    (fn (p, x) => (Stream.printPos fileList p; Tokenizer.printToken x)) tkl
+    (fn (p, x) => (Stream.printPos fileInfo p; Tokenizer.printToken x)) tkl
 end
   | main _  = printLn "Expected a signle argument: file name"