351e82735b
Renamed `convert' to `pict-convert', etc., to avoid confusion with `file/convert' bindings. Moved out of `slideshow/pict' to `slideshow/pict-convert', because most `slideshow/pict' clients do not need it.
11 lines
305 B
Racket
11 lines
305 B
Racket
#lang racket/base
|
|
(require "pict.rkt"
|
|
racket/contract
|
|
texpict/private/convertible)
|
|
|
|
|
|
(provide pict-convert pict-convertible?)
|
|
(provide/contract
|
|
[prop:pict-convertible (struct-type-property/c (-> pict-convertible? pict?))]
|
|
[prop:pict-convertible? (struct-type-property/c predicate/c)])
|