From 7143b44fd1d102b7e70e502fd0e736a32eda1476 Mon Sep 17 00:00:00 2001
From: skalogryz <skalogryz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Mon, 9 Mar 2009 10:40:54 +0000
Subject: [PATCH] + single line function declaration

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@733 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 bindings/pascocoa/parser/ObjCParserUtils.pas | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/bindings/pascocoa/parser/ObjCParserUtils.pas b/bindings/pascocoa/parser/ObjCParserUtils.pas
index ecac4fe9f..8e6c857e2 100755
--- a/bindings/pascocoa/parser/ObjCParserUtils.pas
+++ b/bindings/pascocoa/parser/ObjCParserUtils.pas
@@ -872,12 +872,11 @@ begin
 
   if f._isInLine then s := s + ' inline; '
   else s:=s+ConvertSettings.GetCallConv(true);
-  
-  st.Add(s);
-  if f._isExternal then
-    s := Format('  external name ''%s%s'';', [ConvertSettings.ExternFuncPrefix, f._Name]);
 
+  if f._isExternal then
+    s := s + Format(' external name ''%s%s'';', [ConvertSettings.ExternFuncPrefix, f._Name]);
   st.Add(s);
+  //st.Add(s);
 end;
 
 procedure WriteOutEnumToHeader(enm: TEnumTypeDef; st: TStrings);