diff --git a/collects/typed-racket/base-env/base-env-indexing-abs.rkt b/collects/typed-racket/base-env/base-env-indexing-abs.rkt index f1832a51b1..fe36da07ee 100644 --- a/collects/typed-racket/base-env/base-env-indexing-abs.rkt +++ b/collects/typed-racket/base-env/base-env-indexing-abs.rkt @@ -333,6 +333,14 @@ (cl->* [-> Sym -String Univ (Un)] [->* (list Sym -String index-type) Univ (Un)])] + [raise-result-error + (cl->* + [->* (list Sym -String Univ) Univ (Un)] + [->* (list Sym -String index-type Univ) Univ (Un)])] + [raise-arguments-error + (->* (list Sym -String) Univ (Un))] + [raise-range-error + (->opt Sym -String -String index-type Univ index-type index-type [index-type] (Un))] ))