From 6b569fa82f3c9e19facbafedee24e8dab8b13120 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Fri, 27 Jul 2012 16:22:40 -0400 Subject: [PATCH] Move mutable list functions to the compatibility collect. Mutable pair functions from racket/base are not moved. original commit: 52439d528b78db6394798d9bdd39b2017de03a5e --- .../tests/typed-racket/optimizer/missed-optimizations/pair.rkt | 2 +- collects/typed-racket/base-env/base-env.rkt | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/tests/typed-racket/optimizer/missed-optimizations/pair.rkt b/collects/tests/typed-racket/optimizer/missed-optimizations/pair.rkt index 9250af55..140803ab 100644 --- a/collects/tests/typed-racket/optimizer/missed-optimizations/pair.rkt +++ b/collects/tests/typed-racket/optimizer/missed-optimizations/pair.rkt @@ -50,7 +50,7 @@ TR missed opt: pair.rkt 84:17 (set-mcdr! (ann (quote ()) (MListof Integer)) (ann ) #lang typed/racket -(require racket/mpair) +(require compatibility/mpair) ;; car/cdr can be optimized if they are guaranteed to be applied only to ;; non-empty lists. otherwise, we miss a potential optimization diff --git a/collects/typed-racket/base-env/base-env.rkt b/collects/typed-racket/base-env/base-env.rkt index 38591b3b..779f4653 100644 --- a/collects/typed-racket/base-env/base-env.rkt +++ b/collects/typed-racket/base-env/base-env.rkt @@ -15,7 +15,7 @@ (only-in racket/private/pre-base new-apply-proc) racket/promise racket/system racket/function - racket/mpair + compatibility/mpair racket/base racket/set racket/place