mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-13 10:39:26 +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 -
17 lines
292 B
ObjectPascal
17 lines
292 B
ObjectPascal
{ %target=linux,solaris,freebsd,win32 }
|
|
{ %fail }
|
|
{ %opt=-Sew }
|
|
|
|
{ just some random non-darwin targets }
|
|
|
|
{$linkframework Carbon}
|
|
|
|
type
|
|
CFStringRef = pointer;
|
|
|
|
function CFSTR( c: PChar ): CFStringRef; external name '___CFStringMakeConstantString'; mwpascal;
|
|
|
|
begin
|
|
CFSTR('hello');
|
|
end.
|