diff --git a/components/chelper/cparsertypes.pas b/components/chelper/cparsertypes.pas
index 011794d3b..16afd2ad0 100755
--- a/components/chelper/cparsertypes.pas
+++ b/components/chelper/cparsertypes.pas
@@ -1816,7 +1816,7 @@ begin
     nm:='';
     simple:=TSimpleType.Create(Parser.TokenPos);
 
-    issig:=(Parser.Token='unsigned') or (simple.Name='signed');
+    issig:=(Parser.Token='unsigned') or (Parser.Token='signed');
     if issig then begin
       nm:=nm+Parser.Token+' ';
       Parser.NextToken;