Browse Source

* ifdef heaptrc for heaptrc

peter 27 years ago
parent
commit
1595295776
1 changed files with 7 additions and 1 deletions
  1. 7 1
      compiler/pp.pas

+ 7 - 1
compiler/pp.pas

@@ -107,6 +107,9 @@ uses
 {$ifdef profile}
 {$ifdef profile}
   profile,
   profile,
 {$endif profile}
 {$endif profile}
+{$ifdef heaptrc}
+  heaptrc,
+{$endif heaptrc}
   globals,compiler;
   globals,compiler;
 
 
 {$ifdef useoverlay}
 {$ifdef useoverlay}
@@ -256,7 +259,10 @@ begin
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.31  1998-09-28 16:57:23  pierre
+  Revision 1.32  1998-10-02 17:03:51  peter
+    * ifdef heaptrc for heaptrc
+
+  Revision 1.31  1998/09/28 16:57:23  pierre
     * changed all length(p^.value_str^) into str_length(p)
     * changed all length(p^.value_str^) into str_length(p)
       to get it work with and without ansistrings
       to get it work with and without ansistrings
     * changed sourcefiles field of tmodule to a pointer
     * changed sourcefiles field of tmodule to a pointer