diff --git a/collects/typed-scheme/private/type-effect-printer.ss b/collects/typed-scheme/private/type-effect-printer.ss index 1a3f32f0..51681919 100644 --- a/collects/typed-scheme/private/type-effect-printer.ss +++ b/collects/typed-scheme/private/type-effect-printer.ss @@ -129,7 +129,7 @@ ;; FIXME - this should not be used #; [(Scope: sc) (fp "(Scope ~a)" sc)] - #; + [(B: idx) (fp "(B ~a)" idx)] [(Syntax: t) (fp "(Syntax ~a)" t)] [(Instance: t) (fp "(Instance ~a)" t)]