|
|
1.1 root 1: ; Start up code for AHCC based test programs
2:
3: .extern _main
4:
5: movea.l 4(SP),A5 ; Get pointer to basepage
6: move.l $0C(A5),D0 ; Text segment length
7: add.l $14(A5),D0 ; Data segment length
8: add.l $1C(A5),D0 ; BSS segment length
9: add.l #$2000,D0 ; Space for the stack
10:
11: move.l D0,D1
12: add.l A5,D1
13: and.l #-2,D1
14:
15: movea.l D1,SP
16: move.l D0,-(SP)
17: move.l A5,-(SP)
18: clr.w -(SP)
19: move.w #$4A,-(SP)
20: trap #1 ; Mshrink
21: lea 12(SP),SP
22:
23: jsr main
24:
25: move.w D0,-(SP)
26: move.w #$4C,-(SP)
27: trap #1 ; Pterm
28:
29: .bss
30:
31: .global errno
32: errno: ds.l 1
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.