diff --git a/stockminder.scm b/stockminder.scm
index 44e5993..1c168ac 100755
--- a/stockminder.scm
+++ b/stockminder.scm
@@ -42,3 +42,8 @@ headers: '( ("x-rapidapi-host" . "apidojo-yahoo-finance-v1.p.rapidapi.com")
    (map (lambda (x) (display (string-append
          api-url "query?function=" api-function "&symbol=" (symbol->string x) "&apikey=" api-key "\n")))
       stock-symbols ) )
+(let
+   ((test-input-file (open-input-file "test.json"))
+      (foo "bar") )
+   (write-json (read-json test-input-file))
+   (close-input-port test-input-file) )