From 6af2f711b7c9dae7804d5d18e21593f26d180c28 Mon Sep 17 00:00:00 2001
From: Vincent St-Amour <stamourv@racket-lang.org>
Date: Sat, 2 Jan 2016 12:59:15 -0600
Subject: [PATCH] Fix optimization tests.

---
 pkgs/racket-test-core/tests/racket/optimize.rktl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/pkgs/racket-test-core/tests/racket/optimize.rktl b/pkgs/racket-test-core/tests/racket/optimize.rktl
index 1aa59ed2a5..01ab2b1f16 100644
--- a/pkgs/racket-test-core/tests/racket/optimize.rktl
+++ b/pkgs/racket-test-core/tests/racket/optimize.rktl
@@ -9,7 +9,10 @@
          racket/unsafe/undefined
          racket/unsafe/ops
          compiler/zo-parse
-         compiler/zo-marshal)
+         compiler/zo-marshal
+         ;; `random` from `racket/base is a Racket function, which makes
+         ;; compilation less predictable than a primitive
+         (only-in '#%kernel random))
 
 ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;