From 4db78960d075c8a7e1bfc3c3fb00fcbf536a4cf3 Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Sat, 4 Jan 2014 14:33:24 +0000
Subject: [PATCH] codetools: understand 'noreturn' procedure modifier

git-svn-id: trunk@43643 -
---
 components/codetools/keywordfunclists.pas | 1 +
 components/codetools/pascalparsertool.pas | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/components/codetools/keywordfunclists.pas b/components/codetools/keywordfunclists.pas
index 74ed6d0341..b3baae3ab6 100644
--- a/components/codetools/keywordfunclists.pas
+++ b/components/codetools/keywordfunclists.pas
@@ -900,6 +900,7 @@ begin
     Add('LOCAL'        ,{$ifdef FPC}@{$endif}AllwaysTrue);
     ADD('MWPASCAL'     ,{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('NEAR'         ,{$ifdef FPC}@{$endif}AllwaysTrue);
+    Add('NORETURN'     ,{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('NOSTACKFRAME' ,{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('OLDFPCCALL'   ,{$ifdef FPC}@{$endif}AllwaysTrue);
     Add('OVERLOAD'     ,{$ifdef FPC}@{$endif}AllwaysTrue);
diff --git a/components/codetools/pascalparsertool.pas b/components/codetools/pascalparsertool.pas
index cd86d5ace4..2d15bd9b2f 100644
--- a/components/codetools/pascalparsertool.pas
+++ b/components/codetools/pascalparsertool.pas
@@ -1171,7 +1171,7 @@ function TPascalParserTool.KeyWordFuncClassMethod: boolean;
 
  proc specifiers without parameters:
    stdcall, virtual, abstract, dynamic, overload, override, cdecl, inline,
-   compilerproc, rtlproc
+   compilerproc, rtlproc, noreturn
 
  proc specifiers with parameters:
    message <id or number>