Julia Juno Jupyter part1 [無断転載禁止]©2ch.net (745ﾚｽ)
Julia Juno Jupyter part1 [無断転載禁止]©2ch.net http://mevius.5ch.net/test/read.cgi/tech/1455271513/
上
下
前次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
抽出解除
ﾚｽ栞
ﾘﾛｰﾄﾞ規制
です｡10分ほどで解除するので､
他のﾌﾞﾗｳｻﾞ
へ避難してください｡
7: デフォルトの名無しさん [sage] 2016/02/13(土) 10:11:00.83 ID:3L3e3K/U という訳で保守がてら juliaからCの関数を呼んでみた julia> ccall(:printf, Void, (Ptr{Cchar}, Ptr{Cchar}), "%s", "abc") abc julia> ccall(:printf, Void, (Ptr{Cchar}, Ptr{Cchar}, Int), "%s%d", "abc", 9) abc9 引数の数が自由なのがいいねっ！ http://mevius.5ch.net/test/read.cgi/tech/1455271513/7
97: デフォルトの名無しさん [sage] 2016/07/22(金) 11:45:49.87 ID:f6dSUOKk >>7-11 >>25 >>28 >>30-32 定義はmacro使うと楽 macro c(restype, fnc, argtypes) local args = [symbol("a", n) for n in 1:length(argtypes.args)] quote $(esc(fnc))($(args...)) = ccall($(string(fnc)), $restype, $argtypes, $(args...)) end end @c UInt32 printf (Ptr{Cchar},) @c UInt32 printf (Ptr{Cchar}, UInt32,) printf(pointer(Array{UInt8,1}([65,66,0,67,68,0,0]))) printf("%s\n", pointer(Array{UInt8,1}([65,66,0,67,68,0,0]))) macro m(lib, restype, fnc, argtypes) local args = [symbol("a", n) for n in 1:length(argtypes.args)] quote $(esc(fnc))($(args...)) = ccall(($(string(fnc)), $(Expr(:quote, lib))), $restype, $argtypes, $(args...)) end end @m libcurl Cint curl_free (Ptr{Void},) @m libcurl Ptr{Cchar} curl_getenv (Ptr{Cchar},) @m libcurl Ptr{Cchar} curl_version () v = curl_getenv("TZ") printf(v) curl_free(v) printf(curl_version()) http://mevius.5ch.net/test/read.cgi/tech/1455271513/97
ﾒﾓ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.024s