Some more "typed-scheme" -> "typed-racket".

This commit is contained in:
Eli Barzilay 2011-09-05 00:34:05 -04:00
parent 746aea0024
commit fde857e0cb
22 changed files with 27 additions and 28 deletions

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require/typed file/md5
[md5 ((U Bytes Input-Port) -> Bytes)])
(provide md5)

View File

@ -1,5 +1,5 @@
#lang typed-scheme
;; typed-scheme wrapper on file/tar
#lang typed/racket/base
;; typed-racket wrapper on file/tar
;; yc 2009/2/25
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils typed/mred/mred)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)
@ -7,4 +7,3 @@
[dns-get-name (String String -> String)]
[dns-get-mail-exchanger (String String -> String )]
[dns-find-nameserver (-> (Option String))])

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/file/gif)
(provide (all-from-out typed/file/gif))

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)
;; -- basic mime structures --

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,8 +1,8 @@
#lang typed-scheme
#lang typed/racket/base
(require/typed net/sendurl
[send-url (String -> Void)]
[unix-browser-list (Listof Symbol)]
[browser-preference? (String -> Boolean)]
[external-browser (-> (U Symbol #f (Pair String String)))])
[send-url (String -> Void)]
[unix-browser-list (Listof Symbol)]
[browser-preference? (String -> Boolean)]
[external-browser (-> (U Symbol #f (Pair String String)))])
(provide send-url unix-browser-list browser-preference? external-browser)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(require typed/private/utils)

View File

@ -1,4 +1,4 @@
#lang typed-scheme
#lang typed/racket/base
(define-syntax-rule (dt nm t)
(begin (define-type-alias nm t) (provide nm)))