From 5b7e350bbb440255b866a14d59b69f9d8e411f36 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Tue, 5 Jan 2010 15:53:35 -0500 Subject: Basis.textBlob; support HTTP requests with no headers --- src/c/urweb.c | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'src/c/urweb.c') diff --git a/src/c/urweb.c b/src/c/urweb.c index f52fc459..e63b2060 100644 --- a/src/c/urweb.c +++ b/src/c/urweb.c @@ -3131,6 +3131,12 @@ uw_Basis_int uw_Basis_blobSize(uw_context ctx, uw_Basis_blob b) { return b.size; } +uw_Basis_blob uw_Basis_textBlob(uw_context ctx, uw_Basis_string s) { + uw_Basis_blob b = {strlen(s), s}; + + return b; +} + uw_Basis_blob uw_Basis_fileData(uw_context ctx, uw_Basis_file f) { return f.data; } -- cgit v1.2.3