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");
}
|