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,19 @@
+/
+/
+
+/ aint fortran function
+
+.globl	aint.
+.globl	temp
+
+one = 40200
+
+.globl	retrn
+
+aint.:	temp
+	.+2
+	setf
+	movf	*2(r3),r0
+	modf	$one,r0
+	movf	r1,temp
+	jmp	retrn