syntax/parse: add missing failure -> failure*

2019-03-28 11:25:40 +01:00 · 2019-03-28 11:25:40 +01:00 · 51d7060ff0
commit 51d7060ff0
parent 7fb0250191
1 changed files with 1 additions and 1 deletions
--- a/racket/collects/syntax/parse/private/residual.rkt
+++ b/racket/collects/syntax/parse/private/residual.rkt
@ -240,7 +240,7 @@
                       ;; Don't extend es! That way we don't get spurious "expected ()"
                       ;; that *should* have been cancelled out by ineffable pair failures.
                       |#)
-                   (values 'fail (failure pr es)))])))))
+                   (values 'fail (failure* pr es)))])))))

 (provide illegal-cut-error)