summaryrefslogtreecommitdiff
path: root/packages/cocoaint
diff options
context:
space:
mode:
authorjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2009-09-22 14:30:21 +0000
committerjonas <jonas@3ad0048d-3df7-0310-abae-a5850022a9f2>2009-09-22 14:30:21 +0000
commitba94702f385417b895580b01f7c481898e6e1816 (patch)
tree70fcfc25076d132c7361d22de9f11a78ca2859e0 /packages/cocoaint
parenta16df387aa1a6250886cd00605e36adebd08e778 (diff)
downloadfpc-ba94702f385417b895580b01f7c481898e6e1816.tar.gz
* added missing NSSTR() implementation (fix by Dmitry)
git-svn-id: http://svn.freepascal.org/svn/fpc/branches/objc@13755 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/cocoaint')
-rw-r--r--packages/cocoaint/src/InlineFunctions.inc5
1 files changed, 5 insertions, 0 deletions
diff --git a/packages/cocoaint/src/InlineFunctions.inc b/packages/cocoaint/src/InlineFunctions.inc
index 3d7311a3b1..bb5286f28c 100644
--- a/packages/cocoaint/src/InlineFunctions.inc
+++ b/packages/cocoaint/src/InlineFunctions.inc
@@ -125,3 +125,8 @@ begin
result.width := aSize.width;
result.height := aSize.height;
end;
+
+function NSSTR (inString: PChar): NSString;
+begin
+ Result := NSString(CFSTR(inString));
+end;