From d870c1e79c52db18ff9399bec1fafeb6ba1c1f96 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 2 Jan 2002 19:06:05 +0000
Subject: [PATCH] .

original commit: b371dd974dd0e0098befde7252ba5753448fae01
---
 collects/mzlib/include.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/mzlib/include.ss b/collects/mzlib/include.ss
index a224c92..93ccad6 100644
--- a/collects/mzlib/include.ss
+++ b/collects/mzlib/include.ss
@@ -177,7 +177,7 @@
 	 (check-fn-form (syntax fn) stx)
 	 (with-syntax ([_stx stx])
 	   (syntax/loc stx 
-	     (do-include _stx _stx _stx fn 
+	     (do-include _stx ctx loc fn 
 			 (letrec-syntax ([the-reader (lambda (stx)
 						       (datum->syntax-object
 							#'here