From a1e7cae8dfc1b096b003bb86ee238fc02a0bd61e Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Sun, 14 Jun 2015 20:33:17 -0500
Subject: [PATCH] add provide+safe to `sugar/test`

---
 sugar/main.rkt | 1 +
 sugar/test.rkt | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/sugar/main.rkt b/sugar/main.rkt
index fe4f381..84a6761 100644
--- a/sugar/main.rkt
+++ b/sugar/main.rkt
@@ -19,4 +19,5 @@
 (r+p "list.rkt")
 (r+p "misc.rkt")
 (r+p "string.rkt")
+(r+p "test.rkt")
 (r+p "xml.rkt")
\ No newline at end of file
diff --git a/sugar/test.rkt b/sugar/test.rkt
index ec10cd9..4f5ea12 100644
--- a/sugar/test.rkt
+++ b/sugar/test.rkt
@@ -1,7 +1,7 @@
 #lang racket/base
 (require (for-syntax racket/base))
-(provide (all-defined-out))
-
+(require sugar/define)
+(provide+safe module-test-external module-test-internal module-test-internal+external)
 
 ;; tests using module-boundary contracts
 (define-syntax (module-test-external stx)