From 63df5311c5d86a7632826c9dc93a8bc541176f6d Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Mon, 24 May 2010 09:42:01 -0600 Subject: [PATCH] Racketizing --- collects/net/ftp-sig.rkt | 2 +- collects/net/ftp-unit.rkt | 4 ++-- collects/net/ftp.rkt | 4 ++-- 3 files changed, 5 insertions(+), 5 deletions(-) diff --git a/collects/net/ftp-sig.rkt b/collects/net/ftp-sig.rkt index f177aef1ba..9572594234 100644 --- a/collects/net/ftp-sig.rkt +++ b/collects/net/ftp-sig.rkt @@ -1,4 +1,4 @@ -#lang scheme/signature +#lang racket/signature ftp-connection? ftp-cd diff --git a/collects/net/ftp-unit.rkt b/collects/net/ftp-unit.rkt index e008911e38..c821d9500d 100644 --- a/collects/net/ftp-unit.rkt +++ b/collects/net/ftp-unit.rkt @@ -1,10 +1,10 @@ -#lang scheme/unit +#lang racket/unit ;; Version 0.2 ;; Version 0.1a ;; Micah Flatt ;; 06-06-2002 -(require scheme/date scheme/file scheme/port scheme/tcp "ftp-sig.ss") +(require racket/date racket/file racket/port racket/tcp "ftp-sig.rkt") (import) (export ftp^) diff --git a/collects/net/ftp.rkt b/collects/net/ftp.rkt index 9a704ca76e..5e4ff2a349 100644 --- a/collects/net/ftp.rkt +++ b/collects/net/ftp.rkt @@ -1,5 +1,5 @@ -#lang scheme/base -(require scheme/unit "ftp-sig.ss" "ftp-unit.ss") +#lang racket/base +(require racket/unit "ftp-sig.rkt" "ftp-unit.rkt") (define-values/invoke-unit/infer ftp@)