RosettaCodeData/Task/Call-a-foreign-language-function/Mosaic/call-a-foreign-language-function.mosaic
2023-07-01 13:44:08 -04:00

12 lines
200 B
Text

import clib
importdll msvcrt =
clang function "_strdup" (ref char)ref char
end
proc start=
[]char str:=z"hello strdup"
ref char str2
str2:=_strdup(&.str)
println str2
end