main.rkt
#lang racket/base
(require
 "base.rkt"
 "dialogs.rkt"
 "controls.rkt")

(provide
 (except-out (all-from-out "base.rkt")
             _ihandle _ihandle/null
             _istatus
             _iname/upcase _iname/downcase
             make-constructor-procedure
             send-url)
 (all-from-out "dialogs.rkt")
 (all-from-out "controls.rkt"))