add LCC - a better C-Compiler for WEGA

1990-03-14 12:01:39 +00:00 · 1990-03-14 12:01:39 +00:00 · 74d11e30ac
parent d1ff9bfdf9
commit 74d11e30ac
1 changed files with 16 additions and 0 deletions
--- a/WEGA/contrib/lcc/lib/libc/u8k/sys/fcntl.s
+++ b/WEGA/contrib/lcc/lib/libc/u8k/sys/fcntl.s
@ -0,0 +1,16 @@
+	.seg
+
+	sp := r15
+	SP := rr14
+
+	.psec
+	.code
+_fcntl::
+	{
+	ldm	r0,|_stkseg+3|(sp),#4
+	xor	r4,r4
+	sc	#38			  // switch
+	ld	r2,r4
+	ret	nc
+	jp	cerror
+	}