steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge branch 'master' of git://factorcode.org/git/factor

Doug Coleman 2009-11-30 17:05:13 -06:00
parent f6be34d83b 472e77cb00
commit 8997395b90
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/random/windows/windows.factor
View File

@ -4,7 +4,7 @@ locals namespaces random windows.advapi32 windows.errors
windows.kernel32 math.bitwise ;
IN: random.windows
TUPLE: windows-rng provider type ;
TUPLE: windows-rng < disposable provider type ;
C: <windows-rng> windows-rng
TUPLE: windows-crypto-context handle ;
@ -69,7 +69,7 @@ M: windows-rng random-bytes* ( n tuple -- bytes )
[
[
system-random-generator get-global &dispose drop
secure-random-generator get-global &dispose drop
! system-random-generator get-global &dispose drop
! secure-random-generator get-global &dispose drop
] with-destructors
] "random.windows" add-shutdown-hook