From ceb898747ad287e83fe18f81a955c186b7abac8e Mon Sep 17 00:00:00 2001 From: Chris Wells Date: Tue, 4 Feb 2025 06:53:26 -0600 Subject: Fixing templates + aliases --- src/Prolog.hs | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src/Prolog.hs') diff --git a/src/Prolog.hs b/src/Prolog.hs index a6ac1b5..bb464f5 100644 --- a/src/Prolog.hs +++ b/src/Prolog.hs @@ -216,3 +216,6 @@ instance ToMarkup URI where instance ToValue URI where toValue = toValue . show preEscapedToValue = preEscapedToValue . show + +instance MonadThrow Compiler where + throwM = throwError . pure . displayException -- cgit v1.2.3