|
|
@ -42,3 +42,8 @@ headers: '( ("x-rapidapi-host" . "apidojo-yahoo-finance-v1.p.rapidapi.com") |
|
|
|
(map (lambda (x) (display (string-append |
|
|
|
(map (lambda (x) (display (string-append |
|
|
|
api-url "query?function=" api-function "&symbol=" (symbol->string x) "&apikey=" api-key "\n"))) |
|
|
|
api-url "query?function=" api-function "&symbol=" (symbol->string x) "&apikey=" api-key "\n"))) |
|
|
|
stock-symbols ) ) |
|
|
|
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) ) |
|
|
|