suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

win32: minor repair to single-instance check

Browse Source 
original commit: 0ef5a01c9b2fa6bfccd20bdd58eca5e31cfe1ecc
This commit is contained in:
Matthew Flatt 2010-12-25 08:45:30 -07:00
parent 56a304d3a5
commit 1e42ef1963
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/mred/private/wx/win32/window.rkt
View File

@ -668,8 +668,8 @@
[guid-len (bytes-length GRACKET_GUID)]
[data-len (COPYDATASTRUCT-cbData cd)])
(when (and (data-len
. > .
(+ guid-len (ctype-sizeof _DWORD)))
. >= .
(+ guid-len 4 (ctype-sizeof _DWORD)))
(bytes=? GRACKET_GUID
(scheme_make_sized_byte_string data
guid-len