Add original unix v6

This commit is contained in:
memnoth
2018-01-27 22:35:41 +09:00
commit 2c7099ee50
664 changed files with 106254 additions and 0 deletions
+29
View File
@@ -0,0 +1,29 @@
/
/
/ isign fortran function
.globl isign.
.globl retrn
.globl rerr
.globl temp
isign.: temp
.+2
setd
setl
cmp *2(sp),$2
bne 2f
movif *2(r3),r0
absf r0
movif *4(r3),r1
cfcc
bge 1f
negf r0
1:
movfi r0,temp
jmp retrn
2:
jsr r5,rerr; 10.