Go to most recent revision | Details | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 616 | bw | 1 | unit KOSTypes; |
| 2 | |||
| 3 | interface |
||
| 4 | |||
| 5 | type |
||
| 6 | TKosSign = array[0..7] of Byte; |
||
| 7 | TKosHeader = packed record |
||
| 8 | sign : TKOSSign; |
||
| 9 | version: DWord; |
||
| 10 | start : DWord; |
||
| 11 | size : DWord; |
||
| 12 | memory : DWord; |
||
| 13 | stack : DWord; |
||
| 14 | args : DWord; |
||
| 15 | path : DWord; |
||
| 16 | end; |
||
| 17 | |||
| 18 | const |
||
| 19 | KOS_SIGN: TKOSSign = ($4D, $45, $4E, $55, $45, $54, $30, $31); |
||
| 20 | |||
| 21 | implementation |
||
| 22 | |||
| 23 | end. |