From 0930a80dd38853d846326b65838ada599f5d6c79 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Wed, 28 Jan 1987 15:03:39 +0000
Subject: [PATCH] adapted to new assembler syntax

---
 mach/i80/libmon/char.her.s |  5 +++++
 mach/i80/libmon/char.nas.s |  5 +++++
 mach/i80/libmon/inn2.s     |  5 +++++
 mach/i80/libmon/mon.s      |  5 +++++
 mach/i80/libmon/prdec.s    | 13 +++++++++----
 mach/i80/libmon/prstring.s |  5 +++++
 mach/i80/libmon/trp.s      |  5 +++++
 7 files changed, 39 insertions(+), 4 deletions(-)

diff --git a/mach/i80/libmon/char.her.s b/mach/i80/libmon/char.her.s
index c78044b0e..2791ae248 100644
--- a/mach/i80/libmon/char.her.s
+++ b/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
 
diff --git a/mach/i80/libmon/char.nas.s b/mach/i80/libmon/char.nas.s
index 7ac61c23c..0604a8dd6 100644
--- a/mach/i80/libmon/char.nas.s
+++ b/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.
 
diff --git a/mach/i80/libmon/inn2.s b/mach/i80/libmon/inn2.s
index 181b022fe..2329a5853 100644
--- a/mach/i80/libmon/inn2.s
+++ b/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
diff --git a/mach/i80/libmon/mon.s b/mach/i80/libmon/mon.s
index bdd53170f..68b242b19 100644
--- a/mach/i80/libmon/mon.s
+++ b/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
diff --git a/mach/i80/libmon/prdec.s b/mach/i80/libmon/prdec.s
index e3b32c263..119e595ea 100644
--- a/mach/i80/libmon/prdec.s
+++ b/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
 
diff --git a/mach/i80/libmon/prstring.s b/mach/i80/libmon/prstring.s
index 5479e0b23..ff5653a5d 100644
--- a/mach/i80/libmon/prstring.s
+++ b/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
diff --git a/mach/i80/libmon/trp.s b/mach/i80/libmon/trp.s
index 2665f2cbf..647f6360d 100644
--- a/mach/i80/libmon/trp.s
+++ b/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.
-- 
2.34.1