From f383a39cdafe7459422aca40d7f0678ab27d77b8 Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Thu, 19 Nov 2015 11:53:05 +0000
Subject: [PATCH]  * add tag types for size and point, but deprecated, since
 redundant.

git-svn-id: trunk@32361 -
---
 rtl/objpas/types.pp | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/rtl/objpas/types.pp b/rtl/objpas/types.pp
index 9ecb6944a7..1b1ff811d9 100644
--- a/rtl/objpas/types.pp
+++ b/rtl/objpas/types.pp
@@ -73,15 +73,19 @@ type
   PSmallPoint = Windows.PSmallPoint;
 
   TSize  = Windows.TSize;
+  TagSize  = Windows.tagSize deprecated;
   PSize  = Windows.PSize;
 
   TPoint = Windows.TPoint;
+  TagPoint = Windows.TagPoint deprecated;
   PPoint = Windows.PPoint;
 
   TRect  = Windows.TRect;
   PRect  = Windows.PRect;
 {$else}
   {$i typshrdh.inc}
+   TagSize = tSize deprecated;
+   TagPoint = TPoint deprecated;
 {$endif}
 
   { TPointF }