error message typo

svn: r4295
2006-09-10 16:36:43 +00:00 · 2006-09-10 16:36:43 +00:00 · 412a8b8cb3
commit 412a8b8cb3
parent 42f35ba39f
1 changed files with 1 additions and 1 deletions
--- a/collects/mzlib/foreign.ss
+++ b/collects/mzlib/foreign.ss
@ -1070,7 +1070,7 @@
                    (make-ctype _pointer TAG-ptr
                      (lambda (x)
                        (error
-                         '_cvector
+                         '_TAG
                         "cannot automatically convert a C pointer to a ~a"
                         TAGname))))
                  (define-fun-syntax _TAG