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

avoid trying to load Foundation framework on non-Mac OS

Browse Source 
Relevant to #1549
This commit is contained in:
Matthew Flatt 2017-01-03 12:47:58 -07:00
parent 88b2d5d4e6
commit 78bbcec963
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
racket/collects/ffi/unsafe/nsalloc.rkt
View File

@ -7,8 +7,9 @@
call-with-autorelease)) call-with-autorelease))
;; Make sure Foundation is loaded: ;; Make sure Foundation is loaded:
(void (ffi-lib "/System/Library/Frameworks/Foundation.framework/Foundation" (when (eq? 'macosx (system-type))
#:fail (lambda () #f))) (void (ffi-lib "/System/Library/Frameworks/Foundation.framework/Foundation"
#:fail (lambda () #f))))
(import-class NSAutoreleasePool) (import-class NSAutoreleasePool)