d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

adapted to new assembler syntax

Browse source
This commit is contained in:
ceriel 1987-01-21 15:21:49 +00:00
parent 959800d9b5
commit 9acc354608
1 changed files with 19 additions and 24 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

43
mach/m68k4/libsys/head_em.s
View file

@ -1,15 +1,16 @@
.define .lino,.filn .define .lino,.filn
.define EXIT
.define F_DUM,EXIT
.define begtext,begdata,begbss .define begtext,begdata,begbss
.define EARRAY,ERANGE,ESET,EIDIVZ,EHEAP,EILLINS,ECASE .define EARRAY,ERANGE,ESET,EIDIVZ,EHEAP,EILLINS,ECASE,EBADGTO
.define hol0,.reghp,.limhp,.trpim,.trppc .define hol0,.reghp,.limhp,.trpim,.trppc
.define LINO_AD,FILN_AD .sect .text
.sect .rom
.sect .data
.sect .bss
! m68k4 runtime start-off for the Bleasdale 68000 system
F_DUM = 0
! EM runtime start-off for the Bleasdale 68000 system
LINO_AD = 0 LINO_AD = 0
@ -22,9 +23,9 @@ EIDIVZ = 6
EHEAP = 17 EHEAP = 17
EILLINS = 18 EILLINS = 18
ECASE = 20 ECASE = 20
EBADGTO = 27
.base 0x20000 .sect .text
.text
begtext: begtext:
! Bleasdale puts the argument and environment vectors ! Bleasdale puts the argument and environment vectors
! themselves on top of the stack, instead of POINTERS ! themselves on top of the stack, instead of POINTERS
@ -49,33 +50,27 @@ begtext:
! Now the stack contains an argc (4 bytes), argv-pointer and ! Now the stack contains an argc (4 bytes), argv-pointer and
! envp pointer. ! envp pointer.
pea endbss
jsr _brk
add.l #4,sp
jsr _m_a_i_n jsr _m_a_i_n
add #012,sp add #012,sp
EXIT: EXIT:
jsr __exit jsr __exit
! As a temporary measure
jsr .trp
.data .sect .data
begdata: begdata:
hol0: hol0:
.lino: .lino:
.long 0 ! lino .data4 0 ! lino
.filn: .filn:
.long 0 ! filn .data4 0 ! filn
.reghp: .reghp:
.long endbss .data4 endbss
.limhp: .limhp:
.long endbss .data4 endbss
.trppc: .trppc:
.long 0 .data4 0
.trpim: .trpim:
.long 0 ! was short .data4 0
.bss .sect .bss
begbss: begbss: !initialization is not needed because ALL entries are in zero space!