diff --git a/collects/stepper/private/testing-shared.ss b/collects/stepper/private/testing-shared.ss index a31bb10682..c71d5cba5d 100644 --- a/collects/stepper/private/testing-shared.ss +++ b/collects/stepper/private/testing-shared.ss @@ -4,7 +4,7 @@ (lib "kerncase.ss" "syntax") (lib "file.ss")) - (provide/contract [build-stx-with-highlight ((union (listof any/c) string?) ; input with one or more '(hilite ...) tags + (provide/contract [build-stx-with-highlight ((or/c (listof any/c) string?) ; input with one or more '(hilite ...) tags . -> . (listof syntax?))]) ; result