Format FFI code
This commit is contained in:
parent
772f92037f
commit
a72fe043b2
1 changed files with 16 additions and 16 deletions
32
ffi.bqn
32
ffi.bqn
|
@ -23,29 +23,29 @@
|
||||||
|
|
||||||
CurlFFI←libcurlPath⊸•FFI
|
CurlFFI←libcurlPath⊸•FFI
|
||||||
|
|
||||||
curlPtr←"*:i8"
|
curlPtr ←"*:i8"
|
||||||
curlOption←"i32"
|
curlOption←"i32"
|
||||||
curlCode←"i32"
|
curlCode ←"i32"
|
||||||
|
|
||||||
easyInit←CurlFFI curlPtr‿"curl_easy_init"
|
easyInit ←CurlFFI⟨curlPtr,"curl_easy_init"⟩
|
||||||
easyCleanup←CurlFFI ""‿"curl_easy_cleanup"‿(">"∾curlPtr)
|
easyCleanup ←CurlFFI⟨"","curl_easy_cleanup",">"∾curlPtr⟩
|
||||||
easyReset←CurlFFI ""‿"curl_easy_reset"‿(">"∾curlPtr)
|
easyReset ←CurlFFI⟨"","curl_easy_reset",">"∾curlPtr⟩
|
||||||
|
|
||||||
easySetoptStr←CurlFFI curlCode‿"curl_easy_setopt"‿curlPtr‿curlOption‿"*u8:c8"
|
easySetoptStr ←CurlFFI⟨curlCode,"curl_easy_setopt",curlPtr,curlOption,"*u8:c8"⟩
|
||||||
easySetoptPtr←CurlFFI curlCode‿"curl_easy_setopt"‿curlPtr‿curlOption‿"*:i8"
|
easySetoptPtr ←CurlFFI⟨curlCode,"curl_easy_setopt",curlPtr,curlOption,"*:i8"⟩
|
||||||
easySetoptLong←CurlFFI curlCode‿"curl_easy_setopt"‿curlPtr‿curlOption‿"i32"
|
easySetoptLong ←CurlFFI⟨curlCode,"curl_easy_setopt",curlPtr,curlOption,"i32"⟩
|
||||||
|
|
||||||
easyPerform←CurlFFI curlCode‿"curl_easy_perform"‿curlPtr
|
easyPerform ←CurlFFI⟨curlCode,"curl_easy_perform",curlPtr⟩
|
||||||
|
|
||||||
easyGetinfoStr←CurlFFI curlCode‿"curl_easy_getinfo"‿curlPtr‿curlOption‿"&u8:c8"
|
easyGetinfoStr ←CurlFFI⟨curlCode,"curl_easy_getinfo",curlPtr,curlOption,"&u8:c8"⟩
|
||||||
easyGetinfoLong←CurlFFI curlCode‿"curl_easy_getinfo"‿curlPtr‿curlOption‿"&i32"
|
easyGetinfoLong ←CurlFFI⟨curlCode,"curl_easy_getinfo",curlPtr,curlOption,"&i32"⟩
|
||||||
easyGetinfoDouble←CurlFFI curlCode‿"curl_easy_getinfo"‿curlPtr‿curlOption‿"&f64"
|
easyGetinfoDouble←CurlFFI⟨curlCode,"curl_easy_getinfo",curlPtr,curlOption,"&f64"⟩
|
||||||
|
|
||||||
slistAppend←CurlFFI "*:i8"‿"curl_slist_append"‿"*:i8"‿"*u8:c8"
|
slistAppend ←CurlFFI⟨"*:i8","curl_slist_append","*:i8","*u8:c8"⟩
|
||||||
slistFreeAll←CurlFFI ""‿"curl_slist_free_all"‿">*:i8"
|
slistFreeAll ←CurlFFI⟨"","curl_slist_free_all",">*:i8"⟩
|
||||||
|
|
||||||
fopen←@•FFI "*:i8"‿"fopen"‿"*u8:c8"‿"*u8:c8"
|
fopen ←@•FFI⟨"*:i8","fopen","*u8:c8","*u8:c8"⟩
|
||||||
fclose←@•FFI ""‿"fclose"‿">*:i8"
|
fclose ←@•FFI⟨"","fclose",">*:i8"⟩
|
||||||
|
|
||||||
curlOptions←{
|
curlOptions←{
|
||||||
strOffset←10000
|
strOffset←10000
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue