From dcbce23a9cb9ddf51fb53a39f47124d859973c5e Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 16 Jul 2007 06:17:00 +0000
Subject: [PATCH] codetools: added proc modifier safecall

git-svn-id: trunk@11522 -
---
 components/codetools/keywordfunclists.pas | 2 ++
 components/tdbf/languages/registerdbf.po  | 6 ++++++
 2 files changed, 8 insertions(+)

diff --git a/components/codetools/keywordfunclists.pas b/components/codetools/keywordfunclists.pas
index bc46ab02d9..4fde06f9ea 100644
--- a/components/codetools/keywordfunclists.pas
+++ b/components/codetools/keywordfunclists.pas
@@ -714,6 +714,7 @@ begin
     Add('REGISTER'     ,{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('SAVEREGISTERS',{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('STDCALL'      ,{$ifdef FPC}@{$endif}AllwaysTrue);
+    Add('SAFECALL'     ,{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('VARARGS'      ,{$ifdef FPC}@{$endif}AllwaysTrue); // kylix
     Add('['            ,{$ifdef FPC}@{$endif}AllwaysTrue);
   end;
@@ -733,6 +734,7 @@ begin
     Add('NOSTACKFRAME',{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('DEPRECATED'  ,{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('PLATFORM'    ,{$ifdef FPC}@{$endif}AllwaysTrue);
+    Add('SAFECALL'    ,{$ifdef FPC}@{$endif}AllwaysTrue);
   end;
   
   IsKeyWordProcedureBracketSpecifier:=TKeyWordFunctionList.Create;
diff --git a/components/tdbf/languages/registerdbf.po b/components/tdbf/languages/registerdbf.po
index 28da8aeb62..5d37cccb77 100644
--- a/components/tdbf/languages/registerdbf.po
+++ b/components/tdbf/languages/registerdbf.po
@@ -1,3 +1,9 @@
+msgid ""
+msgstr ""
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+
 #: registerdbf:dbfsalldbasefiles
 msgid "DBase Files"
 msgstr ""