(bind-func ghttp_perform_PUT_string
(lambda (uri:i8* bodystr:i8*)
(ghttp_perform_request_with_setup_fn uri
(lambda (request:ghttp_request*)
(ghttp_set_type request ghttp_type_put)
(ghttp_set_content_type_plaintext request)
(ghttp_set_body request bodystr (convert (strlen bodystr) i32))
void))))