what if you try 

(define magick-get-exception
  (foreign-lambda c-string MagickGetException
                  (const magickwand)
                  (c-pointer "ExceptionType")))