fix: lowerCons signature

app/Gyehoek/ANF/Syntax.hs

@@ -333,7 +333,7 @@ sizeofScm :: Integral a => a
 sizeofScm = 8
 
 lowerCons
-  :: (GenSym :> es)
+  :: (GenSym :> es, Writer (Vector QBE.DataDef) :> es)
   => Name -> QBE.Val -> QBE.Val -> Exp
   -> (QBE.Val -> Eff es BlockBuilder)
   -> Eff es BlockBuilder