whalesong/examples/using-resources.rkt
2011-08-12 17:22:33 -04:00

14 lines
277 B
Racket

#lang planet dyoo/whalesong
(require (planet dyoo/whalesong/resource)
(planet dyoo/whalesong/image))
(define-resource whale-resource "images/humpback.jpg")
(define whale-image
(image-url
(resource->url whale-resource)))
whale-resource
whale-image
whale-image