Formatting.
This commit is contained in:
parent
54301ad5ed
commit
7573fd7ee0
|
@ -6,7 +6,9 @@
|
||||||
|
|
||||||
(define (traverse b)
|
(define (traverse b)
|
||||||
(define (fail v)
|
(define (fail v)
|
||||||
(raise-blame-error (blame-swap b) v "Attempted to use a higher-order value passed as `Any` in untyped code"))
|
(raise-blame-error
|
||||||
|
(blame-swap b) v
|
||||||
|
"Attempted to use a higher-order value passed as `Any` in untyped code"))
|
||||||
|
|
||||||
(define (t v)
|
(define (t v)
|
||||||
(define (wrap-struct s)
|
(define (wrap-struct s)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user