From 02d046daf1529bc75e13d5b80b3d6a7f8d46a28c Mon Sep 17 00:00:00 2001 From: Asumu Takikawa Date: Fri, 16 May 2014 14:18:43 -0400 Subject: [PATCH] Rackety in TR tests --- .../tests/typed-racket/unit-tests/contract-tests.rkt | 6 +++--- .../unit-tests/special-env-typecheck-tests.rkt | 4 ++-- .../tests/typed-racket/unit-tests/subtype-tests.rkt | 4 ++-- .../tests/typed-racket/unit-tests/test-utils.rkt | 10 +++++----- .../tests/typed-racket/unit-tests/type-equal-tests.rkt | 4 ++-- 5 files changed, 14 insertions(+), 14 deletions(-) diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/contract-tests.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/contract-tests.rkt index 67f64c8924..7dfb7687f0 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/contract-tests.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/contract-tests.rkt @@ -1,9 +1,9 @@ -#lang scheme/base +#lang racket/base (require "test-utils.rkt" - (for-syntax scheme/base + (for-syntax racket/base syntax/parse) - (for-template scheme/base) + (for-template racket/base) (private type-contract) (rep type-rep) (types abbrev numeric-tower union) diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/special-env-typecheck-tests.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/special-env-typecheck-tests.rkt index 576fdb4e29..ef139a0052 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/special-env-typecheck-tests.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/special-env-typecheck-tests.rkt @@ -2,8 +2,8 @@ (require "test-utils.rkt" "evaluator.rkt" - (for-syntax scheme/base) - (for-template scheme/base) + (for-syntax racket/base) + (for-template racket/base) (rep type-rep filter-rep object-rep) (for-syntax (rename-in (types utils union numeric-tower abbrev filter-ops) [Un t:Un] diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/subtype-tests.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/subtype-tests.rkt index 88d709af00..5200cc3afd 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/subtype-tests.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/subtype-tests.rkt @@ -1,11 +1,11 @@ -#lang scheme/base +#lang racket/base (require "test-utils.rkt" (types subtype numeric-tower union utils abbrev) (rep type-rep) (env init-envs type-env-structs) rackunit - (for-syntax scheme/base)) + (for-syntax racket/base)) (provide tests) (gen-test-main) diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/test-utils.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/test-utils.rkt index 6ee79ac4fe..1521c79f71 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/test-utils.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/test-utils.rkt @@ -1,10 +1,10 @@ -#lang scheme/base +#lang racket/base -(require scheme/require-syntax - scheme/match - scheme/gui/dynamic +(require racket/require-syntax + racket/match + racket/gui/dynamic typed-racket/utils/utils - (for-syntax scheme/base syntax/parse) + (for-syntax racket/base syntax/parse) (types utils) (rep type-rep) rackunit rackunit/text-ui) diff --git a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/type-equal-tests.rkt b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/type-equal-tests.rkt index 26fff4ef0a..70c3a2fafe 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/type-equal-tests.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/type-equal-tests.rkt @@ -1,6 +1,6 @@ -#lang scheme/base +#lang racket/base -(require "test-utils.rkt" (for-syntax scheme/base) +(require "test-utils.rkt" (for-syntax racket/base) (rep type-rep) (types abbrev numeric-tower union) rackunit)