From c36e308775acc4d8c8efe0d826909627463e9fa7 Mon Sep 17 00:00:00 2001
From: Oliver Lehmann <lehmann@ans-netz.de>
Date: Sat, 7 Jun 2008 19:36:19 +0000
Subject: [PATCH] WEGA 3.2 compatible crt0.s

---
 WEGA/src/lib/libc/csu/crt0.s | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 WEGA/src/lib/libc/csu/crt0.s

diff --git a/WEGA/src/lib/libc/csu/crt0.s b/WEGA/src/lib/libc/csu/crt0.s
new file mode 100644
index 0000000..592e277
--- /dev/null
+++ b/WEGA/src/lib/libc/csu/crt0.s
@@ -0,0 +1,33 @@
+crt0 module
+
+internal
+foo		word
+
+external
+_environ	word
+__callex	procedure
+_exit		procedure
+_main		procedure
+
+global
+
+start procedure
+	entry
+		ld	r7,@r15
+		lda	r6,%0000+2(r15)
+		ld	r2,@r6
+		clr	%0000-2(r2)
+		ld	r5,r6
+		subl	rr0,rr0
+		cpir	r0,@r5,r1,eq
+		cp	r5,r2
+		jr	ult,_foo
+		dec	r5,#2
+_foo:
+		ld	_environ,r5
+		call	_main
+		ld	r7,r2
+		call	__callex
+		sc	#1
+end start
+end crt0