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();