mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 08:18:12 +02:00
24 lines
304 B
ObjectPascal
24 lines
304 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.
|