Add original unix v6

2018-01-27 22:35:41 +09:00
commit 2c7099ee50
664 changed files with 106254 additions and 0 deletions
@@ -0,0 +1,34 @@
+/
+/
+
+/ cmplx fortran function
+
+.globl	cmplx.
+.globl	dcmplx.
+
+.globl	retrn
+.globl	temp
+.globl	rerr
+
+dcmplx.:temp
+	.+2
+	setd
+	br	1f
+
+cmplx.:	temp
+	.+2
+	setf
+1:
+	cmp	*2(sp),$2
+	bne	1f
+	mov	r3,r1
+	tst	(r1)+
+	movf	*(r1)+,r0
+	movf	*(r1)+,r1
+	mov	$temp,r1
+	movf	r0,(r1)+
+	movf	r1,(r1)+
+	jmp	retrn
+
+1:
+	jsr	r5,rerr; 6.