Fix DecodeError runner
This commit is contained in:
parent
aac73efd3a
commit
4d73ab6d69
|
@ -1031,7 +1031,7 @@
|
|||
[`#s(DecodeShort ,(strip-annotations bs))
|
||||
(check-eq? (d bs) 'short loc)]
|
||||
[`#s(DecodeError ,(strip-annotations bs))
|
||||
(check-eq? (d bs) (void) loc)]
|
||||
(check-true (void? (d bs)) loc)]
|
||||
[_
|
||||
(write-preserve t* #:indent #f)
|
||||
(newline)])))
|
||||
|
|
Loading…
Reference in New Issue