adapted to new assembler syntax

mach/i80/libmon/char.her.s

@@ -1,4 +1,9 @@
 .define getchar, putchar
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
 ! These getchar and putchar routines can be used for HERMAC computer
 

mach/i80/libmon/char.nas.s

@@ -1,4 +1,9 @@
 .define getchar, putchar
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
 ! These getchar and putchar routines can be used for NASCOM computer.
 

mach/i80/libmon/inn2.s

@@ -1,4 +1,9 @@
 .define .inn2
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
 ! Bit test on 16 bits set
 ! Expects on stack:	bit number

mach/i80/libmon/mon.s

@@ -1,4 +1,9 @@
 .define .mon
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
 ! Monitor call
 ! Expects on stack:	monitor call number

mach/i80/libmon/prdec.s

@@ -1,4 +1,9 @@
 .define prdec
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
 ! print hl-reg as a decimal number.
 
@@ -50,8 +55,8 @@ convert:
 	ret
 
 table:
-	.short	10000
-	.short	1000
-	.short  100
-	.short	10
+	.data2	10000
+	.data2	1000
+	.data2  100
+	.data2	10
 

mach/i80/libmon/prstring.s

@@ -1,4 +1,9 @@
 .define prstring
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
 ! print a string of characters to the console
 ! entry: de-reg points to the string

mach/i80/libmon/trp.s

@@ -3,6 +3,11 @@
 .define efdivz, eiund, efund, econv, estack, eheap, eillins, eoddz
 .define ecase, ememflt, ebadptr, ebadpc, ebadlae, ebadmon, ebadlin, ebadgto
 .define eunimpl
+.sect .text
+.sect .rom
+.sect .data
+.sect .bss
+.sect .text
 
 ! Trap routine
 ! Expects trap number on stack.