Re: excpetion printing

[Matt Wette]

On 4/20/21 5:43 PM, Matt Wette wrote:
> Is there any error I can throw in Guile that I don't catch myself
> but will result in a user-friendly error message at the top?  Not this:
>
> Throw to key `misc' with args `("read-yaml-file" "file not found: ~S" 
> ("demo1x.yml") #f)'.
I did get this:
yaml.scm:37:4: In procedure read-yaml-file:
ERROR:
  1. &message: "read-yaml-file: can't access file:demo1x.yml

using guile 3.0 from
(cond-expand

 (guile-3
  (use-modules (ice-9 exceptions))
  (define (file-not-found filename)
    (raise-exception
     (make-exception-with-message
      (string-append "read-yaml-file: can't access file:"
             filename)))))
 (else
  (define (file-not-found filename)
    (scm-error 'misc "read-yaml-file"
           "file not found: ~S" (list filename) #f))))