Skip to content

Commit 37fa1df

Browse files
Apply suggestion from @github-actions[bot]
Co-authored-by: github-actions[bot] <41898282+github-actions[bot]@users.noreply.github.com>
1 parent 8a01c33 commit 37fa1df

File tree

1 file changed

+1
-3
lines changed

1 file changed

+1
-3
lines changed

private/syntax-path.rkt

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -621,9 +621,7 @@
621621
[(prefab-struct? unwrapped)
622622
(list-ref (struct->list unwrapped) element)]
623623
[else stx])))
624-
(if (or (pair? result-stx) (empty? result-stx))
625-
#false
626-
#true)))
624+
(not (or (pair? result-stx) (empty? result-stx)))))
627625

628626

629627
(module+ test

0 commit comments

Comments
 (0)