Skip to content

Commit e4fcfcd

Browse files
resyntax-ci[bot]rfindler
authored andcommitted
Fix 1 occurrence of always-throwing-if-to-when
Using `when` and `unless` is simpler than a conditional with an always-throwing branch.
1 parent 5d5988d commit e4fcfcd

1 file changed

Lines changed: 3 additions & 3 deletions

File tree

drracket-test/tests/drracket/private/drracket-test-util.rkt

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -593,9 +593,9 @@
593593
(call-with-values f (lambda x (set! anss x))))
594594
(semaphore-post s)))
595595
(semaphore-wait s)
596-
(if raised-exn?
597-
(raise exn)
598-
(apply values anss))))
596+
(when raised-exn?
597+
(raise exn))
598+
(apply values anss)))
599599

600600
;; this is assumed to not open an windows or anything like that
601601
;; but just to print and return.

0 commit comments

Comments
 (0)