12 lines
269 B
Racket
12 lines
269 B
Racket
#lang scheme/load
|
|
|
|
;; provide another source to import srcloc? to avoid
|
|
;; collisions with the version from mzscheme.
|
|
(module srcloc scheme/base
|
|
|
|
(provide (rename-out [srcloc? s:srcloc?])))
|
|
|
|
(module foo typed-scheme
|
|
|
|
(require/opaque-type Srcloc s:srcloc? 'srcloc))
|