source: branches/bigint/BigIntVM.lpr

Last change on this file was 8, checked in by chronos, 3 months ago
  • Added: Common package.
  • Added: Memory form to show content of memory.
File size: 858 bytes
Line 
1program BigIntVM;
2
3uses
4 {$IFDEF UNIX}
5 cthreads, clocale,
6 {$ENDIF}
7 {$IFDEF HASAMIGA}
8 athreads,
9 {$ENDIF}
10 Interfaces, SysUtils, // this includes the LCL widgetset
11 Forms, FormMain, FormDisassembler, FormMemory, Cpu, IntMemory, Int, Machine,
12 DeviceManager, Screen, Console, Device, Assembler, Instructions, Parser,
13 Message, Disassembler, CommonPackage
14 { you can add units after this };
15
16{$R *.res}
17
18{$if declared(UseHeapTrace)}
19const
20 HeapTraceLog = 'heaptrclog.trc';
21{$ENDIF}
22
23begin
24 {$if declared(UseHeapTrace)}
25 // Heap trace
26 DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
27 SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
28 {$ENDIF}
29
30 RequireDerivedFormResource:=True;
31 Application.Scaled:=True;
32 Application.Initialize;
33 Application.CreateForm(TFormMain, FormMain.FormMain);
34 Application.Run;
35end.
36
Note: See TracBrowser for help on using the repository browser.