We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 6618ba6 commit dff6807Copy full SHA for dff6807
src/syntax/read.rkt
@@ -185,7 +185,7 @@
185
#:when (eq? key ':alt))
186
(match (parse-platform-name val) ; plat-name is symbol or #f
187
; If plat-name extracted, check if name matches
188
- [(? symbol? plat-name) (cons val (equal? plat-name (*platform-name*)))]
+ [(? symbol? plat-name) (cons val (equal? (~a plat-name) (*platform-name*)))]
189
; try to lower
190
[#f
191
(with-handlers ([exn:fail:user:herbie:missing? (lambda (e) (cons val #f))])
0 commit comments