Ticket #49 (closed defect)
object-name wrong for (pseudo-parameter/c ... -> ...)
Reported by: | dherman | Owned by: | dherman |
---|---|---|---|
Priority: | minor | Milestone: | |
Component: | dherman/parameter.plt | Keywords: | |
Cc: | Version: | ||
Racket Version: |
Description
(module a scheme (require (planet dherman/parameter:1:3)) (define p (let ([f add1]) (make-pseudo-parameter (lambda () f) (lambda (g) (set! f g))))) (provide/contract [p (pseudo-parameter/c (-> number? number?))])) > (require 'a) > (p) #<procedure:unsaved-editor4117:9:47>
Change History
Note: See
TracTickets for help on using
tickets.