moved the surrogate library to scheme/ (out of mzlib/)

svn: r9554

original commit: baa9ed726a8943cb496cc13f45e2cd85d4a825f3
This commit is contained in:
Robby Findler 2008-05-01 02:51:52 +00:00
parent 6e466e5c1b
commit 4ed12b3ae6

View File

@ -1,12 +1,12 @@
#lang scheme/unit #lang scheme/unit
(require mzlib/surrogate (require scheme/class
mzlib/class scheme/surrogate
"sig.ss") "sig.ss")
(import) (import)
(export framework:mode^) (export framework:mode^)
(define-values (host-text-mixin host-text<%> surrogate-text% surrogate-text<%>) (define-values (host-text-mixin host-text<%> surrogate-text% surrogate-text<%>)
(surrogate (surrogate
(augment (void) on-change ()) (augment (void) on-change ())
(override on-char (event)) (override on-char (event))