Use reqwest::blocking::get in cli host

roc-lang · Apr 6, 2021 · e052938 · e052938
1 parent 2d0f848
commit e052938
Showing 1 changed file with 7 additions and 2 deletions.
diff --git a/examples/cli/platform/src/lib.rs b/examples/cli/platform/src/lib.rs
@@ -48,9 +48,14 @@ pub fn roc_fx_putLine(line: RocStr) -> () {
 
 #[no_mangle]
 pub fn roc_fx_httpGetUtf8(url: RocStr) -> RocStr {
-    println!("TODO: read from this URL {:?}", url);
+    let body = reqwest::blocking::get(unsafe { url.as_str() })
+        .unwrap_or_else(|err| todo!("Report this HTTP error: {:?}", err));
 
-    RocStr::from_slice("url!!!".as_bytes())
+    let str = body
+        .text()
+        .unwrap_or_else(|err| todo!("Report this body.text() error: {:?}", err));
+
+    RocStr::from_slice(str.as_bytes())
 }
 
 #[no_mangle]