Skip to content

Commit dff6807

Browse files
committed
Fix CI comparison to target
1 parent 6618ba6 commit dff6807

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/syntax/read.rkt

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -185,7 +185,7 @@
185185
#:when (eq? key ':alt))
186186
(match (parse-platform-name val) ; plat-name is symbol or #f
187187
; If plat-name extracted, check if name matches
188-
[(? symbol? plat-name) (cons val (equal? plat-name (*platform-name*)))]
188+
[(? symbol? plat-name) (cons val (equal? (~a plat-name) (*platform-name*)))]
189189
; try to lower
190190
[#f
191191
(with-handlers ([exn:fail:user:herbie:missing? (lambda (e) (cons val #f))])

0 commit comments

Comments
 (0)