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,24 @@
+f = r5
+.globl j
+.globl classtab,jget
+.globl ctest
+.globl putcstr
+.globl succ
+
+ctest:
+	inc	ctestc
+	mov	r0,-(sp)
+	jsr	pc,jget
+	asl	r0
+	bit	*(sp)+,classtab(r0)
+	clc
+	beq	1f
+	asr	r0
+	jsr	pc,putcstr
+	inc	j(f)
+	sec
+1:
+	rts	pc
+
+.data
+ctestc:	0