mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-12 16:49:35 +02:00
a3c9dc5ec6
+ support for {$frameworkpath x} and -Ffx to add x to the directories to
search for frameworks (Darwin only)
git-svn-id: trunk@8165 -
14 lines
228 B
ObjectPascal
14 lines
228 B
ObjectPascal
{ %target=darwin }
|
|
{ %cpu=i386,powerpc }
|
|
|
|
{$linkframework Carbon}
|
|
|
|
type
|
|
CFStringRef = pointer;
|
|
|
|
function CFSTR( c: PChar ): CFStringRef; external name '___CFStringMakeConstantString'; mwpascal;
|
|
|
|
begin
|
|
CFSTR('hello');
|
|
end.
|