#lang racket/base (require racket/class) (provide image-provider%) (define image-provider% (class object% (abstract has-image? image->file image->mimetype) (super-new)))