From cfa3e4e02d48983b7468a81a5d7f51ca7a525bad Mon Sep 17 00:00:00 2001
From: Stephen Heumann <stephenheumann@gmail.com>
Date: Mon, 3 Dec 2018 18:19:28 -0600
Subject: [PATCH] Allow prototyped function parameter types to begin with
 "volatile".

Prototypes with such parameter types were incorrectly being rejected, e.g. in the following example:

void foo(volatile int *p);
---
 Parser.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Parser.pas b/Parser.pas
index 81a8c7c..3f265ea 100644
--- a/Parser.pas
+++ b/Parser.pas
@@ -1376,7 +1376,8 @@ var
          if token.kind in               {see if we are doing a prototyped list}
             [autosy,externsy,registersy,staticsy,typedefsy,unsignedsy,intsy,
              longsy,charsy,shortsy,floatsy,doublesy,compsy,extendedsy,voidsy,
-             enumsy,structsy,unionsy,typedef,signedsy,constsy] then begin
+             enumsy,structsy,unionsy,typedef,signedsy,constsy,volatilesy]
+            then begin
 
             {handle a prototype variable list}
             numberOfParameters := 0;    {don't allow K&R parm declarations}