We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent ecf8723 commit 6247e3cCopy full SHA for 6247e3c
langs/outlaw/stdlib.rkt
@@ -306,8 +306,10 @@
306
;; the primitive system type returns 1 for mac, 0 otherwise;
307
;; the fall through case is for when %system-type is implemented in Racket
308
(match (%system-type)
309
- [1 'macosx]
310
- [0 'unix]
+ ;; the use of string->symbol here is to avoid subtle issues about symbol interning
+ ;; in separately compiled libraries
311
+ [1 (string->symbol "macosx")]
312
+ [0 (string->symbol "unix")]
313
[x x]))
314
315
(define (not x)
0 commit comments