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

cs: _stdcall for Windows -> __stdcall for Windows x86

Browse Source
This commit is contained in:
Matthew Flatt 2018-09-13 09:04:20 -06:00
parent 2e8e479a52
commit 287157cc6d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/src/cs/rumble/memory.ss
View File

@ -338,7 +338,7 @@
(syntax-case stx ()
[(_ s ...)
(case (machine-type)
[(a6nt ta6nt i3nt ti3nt) #'(foreign-procedure _stdcall s ...)]
[(i3nt ti3nt) #'(foreign-procedure __stdcall s ...)]
[else #'(foreign-procedure s ...)])]))
;; This is an inconvenient callback interface, certainly, but it