implement httpc_test; include "http_client.m"; include "draw.m"; include "sys.m"; sys : Sys; draw : Draw; http : Http_client; httpc_test : module { init : fn (nil : ref Draw->Context, nil : list of string); }; init(nil : ref Draw->Context, nil : list of string) { sys = load Sys Sys->PATH; http = load Http_client Http_client->PATH; draw = load Draw Draw->PATH; get := http->make_request("GET", "bobdomain.com", "/", nil); sys->print("%s\n", "get"); }