Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Merge pull request #22 from lueo/master

Fix a bug on win32
  • Loading branch information...
commit d94fd03d2fdaaea9009f6fa99bf063f4f2731280 2 parents 6fdafa1 + 99f5fe9
@froydnj authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  src/prng/prng.lisp
View
2  src/prng/prng.lisp
@@ -80,7 +80,7 @@ replacement for COMMON-LISP:RANDOM."
(assert (>= (read-sequence seq seed-file) num-bytes))
seq))
;; FIXME: this is _untested_!
- #+(and win32 sb-dynamic-core)(sb!win32:crypt-gen-random num-bytes)
+ #+(and win32 sb-dynamic-core)(sb-win32:crypt-gen-random num-bytes)
#-(or unix (and win32 sb-dynamic-core))(error "OS-RANDOM-SEED is not supported on your platform."))
(defun read-os-random-seed (source &optional (prng *prng*))

0 comments on commit d94fd03

Please sign in to comment.
Something went wrong with that request. Please try again.