[racket] printer-dc% and end-doc
Thank you, it's working :-)
Am Dienstag, 20. November 2012 schrieb Matthew Flatt:
> I've pushed a repair for this bug to the git repo. Meanwhile, a
> workaround is to wrap the `end-doc' call as
>
> (with-handlers ([exn:fail:contract? void])
> (send dc end-doc))
>
> At Tue, 20 Nov 2012 09:20:06 +0100, "Nikolaus Klepp" wrote:
> > Thanks to Matthew I have a printer dialog :-)
> >
> > I can actually print a page, but (send dc end-doc) throws an error.
> >
> > Example:
> >
> > (define pss (get-page-setup-from-user "Drucke das Wunderwerk"))
> > (when pss
> > (current-ps-setup pss)
> > (define dc (new printer-dc%))
> > (send dc start-doc "")
> > (send dc start-page)
> > (send dc set-scale 3 3)
> > (send dc set-text-foreground "blue")
> > (send dc draw-text "Don't Panic!" 0 0)
> > (send dc end-page)
> > (send dc end-doc))
> >
> > meth: broke its contract
> > promised: void?
> > produced: #<semaphore>
> > in: the range of
> > (->m void?)
> > contract from: (class printer-dc%)
> > blaming: (class printer-dc%)
> >
> > Well, the page is printed, but I would like to get rid of that error. Any
> > way to do that?
> >
> > Nik
> > ____________________
> > Racket Users list:
> > http://lists.racket-lang.org/users