From c8597283ef843d17d8819e064dd8c079e9996ec2 Mon Sep 17 00:00:00 2001
From: izydorst <izydorst@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Sun, 10 Nov 2002 15:48:57 +0000
Subject: [PATCH] added _randomize() implementation

git-svn-id: svn://svn.cc65.org/cc65/trunk@1499 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 libsrc/geos/devel/Makefile    |  2 +-
 libsrc/geos/devel/randomize.s | 16 ++++++++++++++++
 2 files changed, 17 insertions(+), 1 deletion(-)
 create mode 100644 libsrc/geos/devel/randomize.s

diff --git a/libsrc/geos/devel/Makefile b/libsrc/geos/devel/Makefile
index 62fb3c53c..653741ab3 100644
--- a/libsrc/geos/devel/Makefile
+++ b/libsrc/geos/devel/Makefile
@@ -8,7 +8,7 @@
 	@$(AS) -o $@ $(AFLAGS) $<
 
 
-S_OBJS	= crt0.o oserror.o
+S_OBJS	= crt0.o oserror.o randomize.o
 
 all: $(S_OBJS)
 
diff --git a/libsrc/geos/devel/randomize.s b/libsrc/geos/devel/randomize.s
new file mode 100644
index 000000000..c16bc54ef
--- /dev/null
+++ b/libsrc/geos/devel/randomize.s
@@ -0,0 +1,16 @@
+;
+; Ullrich von Bassewitz, 05.11.2002
+;
+; void _randomize (void);
+; /* Initialize the random number generator */
+;
+
+    	.export	       	__randomize
+	.import		_srand
+
+	.include	"../inc/geossym.inc"
+
+__randomize:
+	lda	random		; get random value from internal generator
+	ldx	random+1
+	jmp	_srand		; and use it as seed
-- 
2.39.5