Sign in
googlers
/
jrn
/
git
/
4240e0f6c08ff0db4397895a543b80a6f239d2bd
/
.
/
t
/
t4018
/
scheme-module
blob: edfae0ebf7b0f79b2d5abe304a2d42a1731cbc17 [
file
] [
log
] [
blame
]
(
module
A RIGHT
(
export
with
-
display
-
exception
)
(
extern
(
display
-
exception display
-
exception
ChangeMe
))
(
def
(
with
-
display
-
exception thunk
)
(
with
-
catch
(
lambda
(
e
)
(
display
-
exception e
(
current
-
error
-
port
))
e
)
thunk
)))
