How to get error message from error in Scheme

Question

I\'m trying to create code that evaluates expression and return error as string for error:

(cond-expand
  (guile
   (