suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Rackety in TR tests

Browse Source
This commit is contained in:
Asumu Takikawa 2014-05-16 14:18:43 -04:00
parent 5905fbd92a
commit 02d046daf1
5 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/contract-tests.rkt
View File

@ -1,9 +1,9 @@
#lang scheme/base #lang racket/base
(require "test-utils.rkt" (require "test-utils.rkt"
(for-syntax scheme/base (for-syntax racket/base
syntax/parse) syntax/parse)
(for-template scheme/base) (for-template racket/base)
(private type-contract) (private type-contract)
(rep type-rep) (rep type-rep)
(types abbrev numeric-tower union) (types abbrev numeric-tower union)

4
pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/special-env-typecheck-tests.rkt
View File

@ -2,8 +2,8 @@
(require "test-utils.rkt" (require "test-utils.rkt"
"evaluator.rkt" "evaluator.rkt"
(for-syntax scheme/base) (for-syntax racket/base)
(for-template scheme/base) (for-template racket/base)
(rep type-rep filter-rep object-rep) (rep type-rep filter-rep object-rep)
(for-syntax (rename-in (types utils union numeric-tower abbrev filter-ops) (for-syntax (rename-in (types utils union numeric-tower abbrev filter-ops)
[Un t:Un] [Un t:Un]

4
pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/subtype-tests.rkt
View File

@ -1,11 +1,11 @@
#lang scheme/base #lang racket/base
(require "test-utils.rkt" (require "test-utils.rkt"
(types subtype numeric-tower union utils abbrev) (types subtype numeric-tower union utils abbrev)
(rep type-rep) (rep type-rep)
(env init-envs type-env-structs) (env init-envs type-env-structs)
rackunit rackunit
(for-syntax scheme/base)) (for-syntax racket/base))
(provide tests) (provide tests)
(gen-test-main) (gen-test-main)

10
pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/test-utils.rkt
View File

@ -1,10 +1,10 @@
#lang scheme/base #lang racket/base
(require scheme/require-syntax (require racket/require-syntax
scheme/match racket/match
scheme/gui/dynamic racket/gui/dynamic
typed-racket/utils/utils typed-racket/utils/utils
(for-syntax scheme/base syntax/parse) (for-syntax racket/base syntax/parse)
(types utils) (types utils)
(rep type-rep) (rep type-rep)
rackunit rackunit/text-ui) rackunit rackunit/text-ui)

4
pkgs/typed-racket-pkgs/typed-racket-test/tests/typed-racket/unit-tests/type-equal-tests.rkt
View File

@ -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) (rep type-rep)
(types abbrev numeric-tower union) (types abbrev numeric-tower union)
rackunit) rackunit)