In addition to providing "provide", I also provide several of its
sub-forms, most usefully "all-defined-out".
This commit is contained in:
parent
815fd1b49c
commit
c7666c5e4f
|
@ -14,7 +14,8 @@
|
||||||
(all-from-out 2htdp/universe)
|
(all-from-out 2htdp/universe)
|
||||||
show-it)
|
show-it)
|
||||||
|
|
||||||
(provide provide)
|
(provide provide all-defined-out all-from-out rename-out except-out
|
||||||
|
prefix-out struct-out)
|
||||||
|
|
||||||
(define (show-it img)
|
(define (show-it img)
|
||||||
(check-arg 'show-it (image? img) "image" "first" img)
|
(check-arg 'show-it (image? img) "image" "first" img)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user