From 3801bca204d196b8387f5950c275d62b8ea5345c Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Thu, 3 Apr 2008 15:40:34 +0000
Subject: [PATCH] fix leftover MZEXN_MISC_UNSUPPORTED

svn: r9154
---
 src/mzscheme/src/dynext.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/mzscheme/src/dynext.c b/src/mzscheme/src/dynext.c
index e65e463460..f0dfce34d6 100644
--- a/src/mzscheme/src/dynext.c
+++ b/src/mzscheme/src/dynext.c
@@ -400,7 +400,7 @@ static Scheme_Object *do_load_extension(const char *filename,
 		       filename);
 #endif
 #ifdef NO_DYNAMIC_LOAD
-    scheme_raise_exn(MZEXN_MISC_UNSUPPORTED,
+    scheme_raise_exn(MZEXN_FAIL_UNSUPPORTED,
 		     "load-extension: not supported on this platform");
     return NULL;
 #else