[plt-dev] drscheme issues error messages

I don't know yet where this is coming from (I am experimenting with  
error in BSL).


procedure application: expected procedure, given: # 
(struct:exn:fail:contract:arity "procedure error: expects 2  
arguments, given 1: \"traffic light expected, given: some other value 
\"" #<continuation-mark-set>) (no arguments)

  === context ===
/Users/matthias/plt/collects/mred/private/wxme/text.ss:482:2: on- 
default-event method in text%
/Users/matthias/plt/collects/mred/private/wxme/editor-canvas.ss: 
376:2: on-event method in editor-canvas%
/Users/matthias/plt/collects/scheme/private/more-scheme.ss:155:2:  
call-with-break-parameterization
/Users/matthias/plt/collects/scheme/private/more-scheme.ss:271:2:  
call-with-exception-handler