This commit is contained in:
Asumu Takikawa 2013-02-19 12:19:40 -05:00
parent ce960756cb
commit ea0c14dac2

View File

@ -1,8 +1,10 @@
#lang racket/base
(module gif scheme/base ;; A library for creating gifs out of bitmap%s
(require scheme/gui/base
scheme/class (require racket/gui/base
scheme/list racket/class
racket/list
net/gifwrite net/gifwrite
racket/contract) racket/contract)
@ -91,4 +93,3 @@
#:loop? [loop? (and delay #t)]) #:loop? [loop? (and delay #t)])
(write-gifs bms delay filename one-at-a-time? last-frame-delay loop?)) (write-gifs bms delay filename one-at-a-time? last-frame-delay loop?))
)