|
|
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.