From e64d70d4cd72fdcfafed180a6adb12cd74c63cbb Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Thu, 25 Jun 1998 10:51:00 +0000
Subject: [PATCH]   * removed a remaining ifndef NEWPPU     replaced by ifdef
 OLDPPU   * added uf_finalize to ppu unit

---
 compiler/files.pas | 9 +++++++--
 compiler/ppu.pas   | 8 +++++++-
 2 files changed, 14 insertions(+), 3 deletions(-)

diff --git a/compiler/files.pas b/compiler/files.pas
index 3d59a33ef4..9f72dec56f 100644
--- a/compiler/files.pas
+++ b/compiler/files.pas
@@ -166,7 +166,7 @@ unit files;
           destructor done;virtual;
        end;
 
-{$ifndef NEWPPU}
+{$ifdef OLDPPU}
     type
        tunitheader = array[0..19] of char;
     const
@@ -968,7 +968,12 @@ unit files;
 end.
 {
   $Log$
-  Revision 1.28  1998-06-25 08:48:12  florian
+  Revision 1.29  1998-06-25 10:51:00  pierre
+    * removed a remaining ifndef NEWPPU
+      replaced by ifdef OLDPPU
+    * added uf_finalize to ppu unit
+
+  Revision 1.28  1998/06/25 08:48:12  florian
     * first version of rtti support
 
   Revision 1.27  1998/06/24 14:48:34  peter
diff --git a/compiler/ppu.pas b/compiler/ppu.pas
index 60cd1a439b..69ea54acc6 100644
--- a/compiler/ppu.pas
+++ b/compiler/ppu.pas
@@ -95,6 +95,7 @@ const
   uf_in_library     = $10;
   uf_shared_library = $20;
   uf_smartlink      = $40;
+  uf_finalize       = $80;
 
 
 type
@@ -749,7 +750,12 @@ end;
 end.
 {
   $Log$
-  Revision 1.6  1998-06-16 08:56:26  peter
+  Revision 1.7  1998-06-25 10:51:01  pierre
+    * removed a remaining ifndef NEWPPU
+      replaced by ifdef OLDPPU
+    * added uf_finalize to ppu unit
+
+  Revision 1.6  1998/06/16 08:56:26  peter
     + targetcpu
     * cleaner pmodules for newppu