adapted to new assembler syntax

This commit is contained in:
ceriel 1987-01-28 15:03:39 +00:00
parent 212579440e
commit 0930a80dd3
7 changed files with 39 additions and 4 deletions

View file

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

View file

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

View file

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

View file

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

View file

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

View file

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

View file

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