Apply hlint suggestions

AzimMuradov · Jan 2, 2024 · d3ebe76 · d3ebe76
1 parent 6b785bc
commit d3ebe76
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lib/CodeGen/Llvm/Ir2LlvmIr.hs b/lib/CodeGen/Llvm/Ir2LlvmIr.hs
@@ -193,10 +193,10 @@ regStdLibDecl decl = register decl =<< declareAsExtern decl
         LLVM.i64
 
     register :: StdLib.TypedDeclaration -> LLVM.Operand -> Llvm ()
-    register (ident, _) operand = regFun (Txt ident) operand
+    register (ident, _) = regFun (Txt ident)
 
     signatureTypesCount :: Type -> Int
-    signatureTypesCount t = hylo signatureTypesCount'' signatureTypesCount' t
+    signatureTypesCount = hylo signatureTypesCount'' signatureTypesCount'
 
     signatureTypesCount' :: Type -> ListF Type Type
     signatureTypesCount' (TFun pT retT) = Cons pT retT