From 5844f338bf73fd802f016507c2ca711eb01309c2 Mon Sep 17 00:00:00 2001
From: inoussa <inoussa@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Sat, 6 Oct 2018 12:16:20 +0000
Subject: [PATCH] Using TPasTypeAliasType for alias type.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6676 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 wst/trunk/ws_helper/pascal_parser_intf.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/wst/trunk/ws_helper/pascal_parser_intf.pas b/wst/trunk/ws_helper/pascal_parser_intf.pas
index 7d77841b3..40899b443 100644
--- a/wst/trunk/ws_helper/pascal_parser_intf.pas
+++ b/wst/trunk/ws_helper/pascal_parser_intf.pas
@@ -520,7 +520,7 @@ function AddAlias(
         ATable     : TPasModule
 ) : TPasTypeAliasType;
 begin
-  Result := TPasTypeAliasType(AContainer.CreateElement(TPasAliasType,AName,ATable.InterfaceSection,visPublic,'',0));
+  Result := TPasTypeAliasType(AContainer.CreateElement(TPasTypeAliasType,AName,ATable.InterfaceSection,visPublic,'',0));
   Result.DestType := AContainer.FindElementInModule(ABaseType,ATable) as TPasType;
   if Assigned(Result.DestType) then
     Result.DestType.AddRef();