From d00401ccc114cf05a75abf7ed915565bbd2d9d06 Mon Sep 17 00:00:00 2001
From: Vincent St-Amour <stamourv@racket-lang.org>
Date: Mon, 12 Oct 2015 16:40:21 -0500
Subject: [PATCH] Use faster `reverse` inside racket/private/list proper.

---
 racket/collects/racket/private/list.rkt | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/racket/collects/racket/private/list.rkt b/racket/collects/racket/private/list.rkt
index 7dfdf9bd19..f53bf09974 100644
--- a/racket/collects/racket/private/list.rkt
+++ b/racket/collects/racket/private/list.rkt
@@ -1,5 +1,5 @@
 (module list "pre-base.rkt"
-  (require "reverse.rkt")
+  (require (rename-in "reverse.rkt" [alt-reverse reverse]))
 
   (provide foldl
            foldr
@@ -27,7 +27,7 @@
            build-string
            build-list
 
-           (rename-out [alt-reverse reverse])
+           reverse
 
            compose
            compose1)