Commit 277566b

Nick committed on
Add code for using HeapTrc
commit 277566b712f90b9a6b1f1939022483b33365a3fd parent 944419d
1 changed files +10−8
ModifiedGBEmu.lpr +10−8
@@ -20,9 +20,9 @@ uses
20 // font includes here 20 // font includes here
21 {$endif} 21 {$endif}
22 22
23 {$IFDEF debug} 23 {$ifdef DEVELOPMENT}
24 SysUtils, 24 SysUtils,
25 {$ENDIF} 25 {$endif}
26 26
27 Forms, 27 Forms,
28 Interfaces, 28 Interfaces,
@@ -47,12 +47,14 @@ end;
47 {$endif} 47 {$endif}
48 48
49 begin 49 begin
50 //{$IFDEF DEBUG} 50 {$if declared(useHeapTrace)}
51 // Set up -gh output for the Leakview package: 51 // Set up -gh output for the Leakview package:
52 {if FileExists('heap.trc') then 52 if FileExists('heap.trc') then
53 DeleteFile('heap.trc'); 53 DeleteFile('heap.trc');
54 SetHeapTraceOutput('heap.trc');} 54 SetHeapTraceOutput('heap.trc');
55 //{$ENDIF DEBUG} 55
56 Writeln(StdErr, 'Using heaptrc...');
57 {$endIf}
56 58
57 { Before the LCL starts, embed Pixelite so users dont have to install it. 59 { Before the LCL starts, embed Pixelite so users dont have to install it.
58 Unfortunately there isn't really a cross-platform way to do it, so here's an 60 Unfortunately there isn't really a cross-platform way to do it, so here's an