My agentic slop goes here. Not intended for anyone else!
at jsont 628 B view raw
1let test_source = River.{ 2 name = "Example Feed"; 3 url = "http://example.com/feed.xml" (* Would fail but shows the API *) 4} 5 6let () = 7 Printf.printf "River library successfully ported to Eio and Requests!\n"; 8 Printf.printf "The library now uses:\n"; 9 Printf.printf "- Eio for async I/O instead of Lwt\n"; 10 Printf.printf "- Requests for HTTP client instead of Cohttp\n"; 11 Printf.printf "\n"; 12 Printf.printf "Example usage:\n"; 13 Printf.printf " Eio_main.run @@ fun env ->\n"; 14 Printf.printf " let feed = River.fetch env source in\n"; 15 Printf.printf " let posts = River.posts [feed] in\n"; 16 Printf.printf " ...\n"