From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Tue, 5 Nov 2002 13:19:43 +0000 (+0000)
Subject: Change initial seed to 1
X-Git-Tag: V2.12.0~2144
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=839b425890e631f280254d275513b5de8eb5213a;p=cc65

Change initial seed to 1


git-svn-id: svn://svn.cc65.org/cc65/trunk@1488 b7a2c559-68d2-44c3-8de9-860c34a00d81
---

diff --git a/libsrc/common/rand.s b/libsrc/common/rand.s
index 51959619b..0ed52aa8b 100644
--- a/libsrc/common/rand.s
+++ b/libsrc/common/rand.s
@@ -1,4 +1,4 @@
-;	
+;
 ; Randum number generator
 ;
 ; Written and donated by Sidney Cadot - sidney@ch.twi.tudelft.nl
@@ -21,9 +21,11 @@
 
       	.export		_rand, _srand
 
-.bss
+.data
 
-rand:  	.res	4		; Seed
+; The seed. When srand() is not called, the C standard says that that rand()
+; should behave as if srand() was called with an argument of 1 before.
+rand:  	.dword   1
 
 .code
 
@@ -51,7 +53,7 @@ _rand:	clc
  	lda     rand+3
 	adc     #$31
 	sta     rand+3
-	pla			; return bit 8-22 in (X,A)
+	pla	 		; return bit 8-22 in (X,A)
 	rts
 
 _srand:	sta	rand+0		; Store the seed
@@ -61,3 +63,4 @@ _srand:	sta	rand+0		; Store the seed
 	sta     rand+3
 	rts
 
+