t/t4018/scheme-module at reftables-rust

freshlybakedca.ke / git

fork atom

Git fork

fork atom

git / t / t4018 / scheme-module

at reftables-rust 6 lines 235 B view raw

wrap content

atharva.tngl.sh userdiff: add support for Scheme 4y ago

a4373903

1(module A RIGHT
2  (export with-display-exception)
3  (extern (display-exception display-exception ChangeMe))
4  (def (with-display-exception thunk)
5    (with-catch (lambda (e) (display-exception e (current-error-port)) e)
6      thunk)))