Context Navigation

Int.pas

Last change on this file was 2, checked in by chronos, 3 months ago
Added: BigInt VM.
File size: 491 bytes

Line
1	unit Int;
2
3	interface
4
5	uses
6	Classes, SysUtils, Generics.Collections;
7
8	type
9	TInt = Int64;
10	TReadEvent = function: TInt of object;
11	TReadEvents = TList<TReadEvent>;
12	TWriteEvent = procedure (Data: TInt) of object;
13	TWriteEvents = TList<TWriteEvent>;
14	TReadAddrEvent = function (Address: TInt): TInt of object;
15	TReadAddrEvents = TList<TReadAddrEvent>;
16	TWriteAddrEvent = procedure (Address, Data: TInt) of object;
17	TWriteAddrEvents = TList<TWriteAddrEvent>;
18
19
20	implementation
21
22	end.
23

Note: See TracBrowser for help on using the repository browser.