conversion to new assembler format

mach/ns/libem/aar.s

@@ -1,6 +1,11 @@
 .define .aar
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .aar:
 	movd 8(sp), r7

mach/ns/libem/cff.s

@@ -1,6 +1,11 @@
 .define .cff
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .cff :	cmpd 4(sp), 8(sp)
 	beq 1f

mach/ns/libem/cfi.s

@@ -1,6 +1,11 @@
 .define .cfi
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .cfi:	cmpd 4, 8(sp)
 	beq 4f

mach/ns/libem/cif.s

@@ -1,6 +1,11 @@
 .define .cif
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .cif :	cmpd 4, 4(sp)
 	beq 4f

mach/ns/libem/cii.s

@@ -1,6 +1,11 @@
 .define	.cii
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 !r7 will save return addres
 .cii:	

mach/ns/libem/cms.s

@@ -1,6 +1,11 @@
 .define	.cms
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .cms:	movd tos, r7		!return addres
 	addr 4(sp), r1

mach/ns/libem/cmu.s

@@ -1,6 +1,11 @@
 .define	.cmu
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .cmu:	movd tos, r7		!return addres
 	addr 4(sp), r1

mach/ns/libem/csa.s

@@ -1,6 +1,11 @@
 .define	.csa
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 !r0 contains index
 !r1 contains pointer to csa descriptor

mach/ns/libem/csb.s

@@ -1,6 +1,11 @@
 .define	.csb
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 !r0 contains index
 !r1 contains pointer to csb descriptor

mach/ns/libem/dup.s

@@ -1,6 +1,11 @@
 .define	.dup
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 !r2 will save return addres
 .dup:

mach/ns/libem/dvu.s

@@ -1,6 +1,11 @@
 .define	.dvu
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .dvu:	
 	enter[r1,r2],0

mach/ns/libem/end.s

@@ -1,15 +1,20 @@
 .define	endtext,enddata,endbss
 .define _end, _etext, _edata
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 endtext:
 _etext:
 	.align	4
-	.data
+	.sect .data
 enddata:
 _edata:
 	.align	4
-	.bss
+	.sect .bss
 	.align	4
 endbss:
 _end:

mach/ns/libem/exg.s

@@ -1,6 +1,11 @@
 .define	.exg
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .exg:
 	save [r2,r3]

mach/ns/libem/gto.s

@@ -1,6 +1,11 @@
 .define	.gto
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 !r0 contains descriptor addres
 .gto:	

mach/ns/libem/lar.s

@@ -1,6 +1,11 @@
 .define	.lar
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .lar:
 	movd tos, r2

mach/ns/libem/los.s

@@ -1,6 +1,11 @@
 .define	.los
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .los:
 	movd tos, r7

mach/ns/libem/mon.s

@@ -1,6 +1,11 @@
 .define .mon
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .mon:	
 	cmpd 1,4(sp)
@@ -47,7 +52,7 @@
 5:	movd 0, 16(sp)
 	ret 12
 
-.data
+.sect .data
 .add1:	.asciz "monitor call "
 .add2:	.asciz " not implemented\n"
 .align

mach/ns/libem/print.s

@@ -1,6 +1,11 @@
 .define	.print
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .print:
 	save[r0,r1,r2]

mach/ns/libem/prnl.s

@@ -1,6 +1,11 @@
 .define	.prnl
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .prnl:	movb "\n", tos
 	jsr @.putchar

mach/ns/libem/prstr.s

@@ -1,6 +1,11 @@
 .define	.prstr
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 !het adres van de af te drukken string staat op de stack.
 .prstr:

mach/ns/libem/putchar.s

@@ -1,6 +1,11 @@
 .define	.putchar
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .putchar:
 	save [r0, r1, r2, r3]

mach/ns/libem/rck.s

@@ -1,6 +1,11 @@
 .define	.rck
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .rck:	
 	cmpd 0(4(sp)), 8(sp)

mach/ns/libem/rmu.s

@@ -1,6 +1,11 @@
 .define .rmu
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .rmu:
 	enter[r2],0

mach/ns/libem/sar.s

@@ -1,6 +1,11 @@
 .define	.sar
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .sar:
 	movd tos, r2

mach/ns/libem/sts.s

@@ -1,6 +1,11 @@
 .define	.sts
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .sts:
 	movd tos, r7

mach/ns/libem/trp.s

@@ -1,6 +1,11 @@
 .define .trp
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
-	.text
+	.sect .text
 
 .trp:	
 	save [r0, r1]