From 4337ecfd553a916a58b340dee753d1073d41bf33 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sun, 6 Oct 2002 12:25:53 +0000
Subject: [PATCH]   + dump of tdefoptions.df_unique

---
 compiler/utils/ppudump.pp | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/compiler/utils/ppudump.pp b/compiler/utils/ppudump.pp
index ae4ffebd5f..52906e72d9 100644
--- a/compiler/utils/ppudump.pp
+++ b/compiler/utils/ppudump.pp
@@ -753,7 +753,8 @@ procedure readcommondef(const s:string);
 type
   tdefoption=(df_none,
     df_has_inittable,           { init data has been generated }
-    df_has_rttitable            { rtti data has been generated }
+    df_has_rttitable,           { rtti data has been generated }
+    df_unique
   );
   tdefoptions=set of tdefoption;
 var
@@ -764,6 +765,10 @@ begin
   write  (space,'      Type symbol : ');
   readsymref;
   ppufile.getsmallset(defopts);
+
+  if df_unique in defopts then
+    writeln  (space,'      Unique type symbol');
+
   if df_has_rttitable in defopts then
    begin
      write  (space,'      RTTI symbol : ');
@@ -1860,7 +1865,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.31  2002-09-27 21:22:04  carl
+  Revision 1.32  2002-10-06 12:25:53  florian
+    + dump of tdefoptions.df_unique
+
+  Revision 1.31  2002/09/27 21:22:04  carl
     * update system information
 
   Revision 1.30  2002/09/26 12:03:54  florian