From f0c652b8612ce939fafb74584f1d2386d0a937a3 Mon Sep 17 00:00:00 2001 From: crumbtoo Date: Tue, 30 Jan 2024 13:03:07 -0700 Subject: [PATCH] fixup! ttg boilerplate --- src/Rlp/Syntax.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Rlp/Syntax.hs b/src/Rlp/Syntax.hs index ecfb786..2b5ce6b 100644 --- a/src/Rlp/Syntax.hs +++ b/src/Rlp/Syntax.hs @@ -127,7 +127,7 @@ data RlpExpr p = LetE' (XLetE p) [Binding' p] (RlpExpr' p) | LitE' (XLitE p) (Lit p) | ParE' (XParE p) (RlpExpr' p) | OAppE' (XOAppE p) (IdP p) (RlpExpr' p) (RlpExpr' p) - | XRlpExprE' (XXRlpExprE p) + | XRlpExprE' !(XXRlpExprE p) type family XLetE p type family XVarE p