]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/random/random.factor
factor: Rename GENERIC# to GENERIC#:.
[factor.git] / basis / random / random.factor
index d1ee076a1f7b3ecf4b60ee2188280b2329b12d8f..37e05bb6aa53ff3bc9ab1e92472b44448fe57f9d 100644 (file)
@@ -14,7 +14,7 @@ SYMBOL: system-random-generator
 SYMBOL: secure-random-generator
 SYMBOL: random-generator
 
-GENERIC# seed-random 1 ( obj seed -- obj )
+GENERIC#: seed-random 1 ( obj seed -- obj )
 GENERIC: random-32* ( obj -- n )
 GENERIC: random-bytes* ( n obj -- byte-array )
 
@@ -76,7 +76,7 @@ PRIVATE>
         [ 32 shift obj random-32* + ] [ 32 + ] [ 32 - ] tri*
     ] while drop [ m * ] [ neg shift ] bi* ; inline
 
-GENERIC# (random-integer) 1 ( m obj -- n )
+GENERIC#: (random-integer) 1 ( m obj -- n )
 M: fixnum (random-integer) ( m obj -- n ) random-integer-loop ;
 M: bignum (random-integer) ( m obj -- n ) random-integer-loop ;