mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-05-02 23:13:46 +02:00
a23630260b
the syntax is exactly the same as for "external", except for
the keyword. It is currently only active for Darwin targets.
It should also work at least for Linux targets, but only with
the GNU assembler (which is why it is not activated there)
+ test for this functionality
git-svn-id: trunk@12009 -
25 lines
305 B
ObjectPascal
25 lines
305 B
ObjectPascal
{ %norun }
|
|
|
|
{ %target=darwin }
|
|
{ %opt=-olibtweaklib1.dylib }
|
|
|
|
{$PIC+}
|
|
|
|
library tweaklib;
|
|
|
|
var
|
|
_myvar: cardinal; export name '_MYVAR';
|
|
|
|
function _test: cardinal;
|
|
begin
|
|
writeln('this is a test');
|
|
_test:=$facef00d;
|
|
_myvar:=$12345678;
|
|
end;
|
|
|
|
exports
|
|
_test name '_TEST',
|
|
_myvar name '_MYVAR';
|
|
|
|
end.
|