From a8f6441b54c1445187796b3bae09fb099477edfb Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Thu, 26 Jun 2003 16:25:16 +0000
Subject: [PATCH] .

original commit: 6ea8536eee3b588453b579b7206cd4e5a9f31ea2
---
 collects/mrlib/include-bitmap.ss | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/collects/mrlib/include-bitmap.ss b/collects/mrlib/include-bitmap.ss
index bd849546..85580da5 100644
--- a/collects/mrlib/include-bitmap.ss
+++ b/collects/mrlib/include-bitmap.ss
@@ -2,7 +2,8 @@
   (require (lib "mred.ss" "mred")
 	   (lib "class.ss")
 	   (lib "file.ss"))
-  (require-for-syntax (lib "path-spec.ss" "syntax"))
+  (require-for-syntax (lib "path-spec.ss" "syntax")
+		      (lib "cm-accomplice.ss"))
 
   (provide include-bitmap
            include-bitmap/relative-to)
@@ -23,6 +24,7 @@
 		 (with-input-from-file c-file
 		   (lambda ()
 		     (read-string (file-size c-file)))))])
+	 (register-external-file c-file)
 	 (with-syntax ([content content]
 		       [c-file c-file])
 	   (syntax/loc stx