Call a foreign-language function: Difference between revisions

(Add LabVIEW)
Line 400:
`free(@p)`;
);</lang>
 
=={{header|Mathematica}}==
This works on windows and on linux/mac (through Mono)
<lang Mathematica>Needs["NETLink`"];
externalstrdup=DefineDLLFunction["_strdup","msvcrt.dll","string",{"string"}];
Print["Duplicate: ",externalstrdup["Hello world!"]]</lang>
output
<pre>Duplicate: Hello world!</pre>
 
=={{header|Modula-2}}==