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