From 9804d70af42ed99df09bffc84882dd17a1c77624 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Sat, 8 Sep 2007 23:50:10 +0000
Subject: [PATCH] fix GC registration of PS glyph-exists function

svn: r7300
---
 src/mred/wxs/wxscheme.cxx | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/mred/wxs/wxscheme.cxx b/src/mred/wxs/wxscheme.cxx
index a24a33b9fd..cbd76a11fe 100644
--- a/src/mred/wxs/wxscheme.cxx
+++ b/src/mred/wxs/wxscheme.cxx
@@ -1339,6 +1339,7 @@ static Scheme_Object *SetPSProcs(int, Scheme_Object *a[])
   wxREGGLOB(ps_draw_text);
   wxREGGLOB(ps_get_text_extent);
   wxREGGLOB(ps_expand_name);
+  wxREGGLOB(ps_glyph_exists);
   ps_draw_text = a[0];
   ps_get_text_extent = a[1];
   ps_expand_name = a[2];