From 3afa09f177958df4f4289a394cb6225b3623fb65 Mon Sep 17 00:00:00 2001
From: Matthias Felleisen <matthias@racket-lang.org>
Date: Thu, 5 Jun 2008 21:16:02 +0000
Subject: [PATCH] export as primitives

svn: r10157
---
 collects/htdp/image.ss | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/collects/htdp/image.ss b/collects/htdp/image.ss
index ec6e0a2bc6..2c359a5532 100644
--- a/collects/htdp/image.ss
+++ b/collects/htdp/image.ss
@@ -11,11 +11,13 @@ plt/collects/tests/mzscheme/image-test.ss
          mzlib/class
          (lib "cache-image-snip.ss" "mrlib")
          mzlib/math
+	 lang/prim
          (lib "posn.ss" "lang")
          (lib "imageeq.ss" "lang" "private")
          "error.ss")
 
-(provide image-width
+(provide-primitives
+         image-width
          image-height
          overlay
          overlay/xy