@@ -22,7 +22,7 @@ qDyn qe = do
22 Just (Refl :: d :~: Exp)
22 Just (Refl :: d :~: Exp)
23 | AppE (VarE m) eInner <- d
23 | AppE (VarE m) eInner <- d
24 , m == 'unqMarker
24 , m == 'unqMarker
25− -> do n <- lift $ newName "dyn"
25+ -> do n <- lift $ newName "dynamicQuotedExpressionVariable"
26 modify ((n, eInner):)
26 modify ((n, eInner):)
27 return $ VarE n
27 return $ VarE n
28 _ -> gmapM f d
28 _ -> gmapM f d