Use cardano-config and adopt db-synthesizer - #6628
Draft
jasagredo wants to merge 4 commits into
Draft
IOG Hydra / ci/hydra-build:x86_64-linux.native.checks/hlint
failed
Jul 24, 2026 in 1m 1s
Build failed
1 failed steps
Details
Failed Steps
Step 1
Derivation
/nix/store/j2f1z5ax8skm65qq1cp6zd4z9ll05pw9-hlint-check.drv
Log
cardano-node/app/DBSynthesizer/Parsers.hs:159:6-39: Suggestion: Use $>
Found:
parseForce *> pure OpenCreateForce
Perhaps:
parseForce Data.Functor.$> OpenCreateForce
cardano-node/app/DBSynthesizer/Parsers.hs:160:12-41: Suggestion: Use $>
Found:
parseAppend *> pure OpenAppend
Perhaps:
parseAppend Data.Functor.$> OpenAppend
cardano-node/src/Cardano/Node/Configuration/CardanoConfigCompare.hs:17:1-68: Warning: Use fewer imports
Found:
import Cardano.Node.Types ( NodeProtocolConfiguration(..) )
import Cardano.Node.Types
( CheckpointsFile(..),
CheckpointsHash,
GenesisFile(..),
GenesisHash,
MaxConcurrencyBulkSync(..),
MaxConcurrencyDeadline(..),
NodeAlonzoProtocolConfiguration(..),
NodeByronProtocolConfiguration(..),
NodeCheckpointsConfiguration(..),
NodeConwayProtocolConfiguration(..),
NodeDijkstraProtocolConfiguration(..),
NodeHardForkProtocolConfiguration(..),
NodeShelleyProtocolConfiguration(..) )
Perhaps:
import Cardano.Node.Types
( NodeProtocolConfiguration(..),
CheckpointsFile(..),
CheckpointsHash,
GenesisFile(..),
GenesisHash,
MaxConcurrencyBulkSync(..),
MaxConcurrencyDeadline(..),
NodeAlonzoProtocolConfiguration(..),
NodeByronProtocolConfiguration(..),
NodeCheckpointsConfiguration(..),
NodeConwayProtocolConfiguration(..),
NodeDijkstraProtocolConfiguration(..),
NodeHardForkProtocolConfiguration(..),
NodeShelleyProtocolConfiguration(..) )
cardano-node/src/Cardano/Node/Tools/DBSynthesizer.hs:3:1-31: Warning: Unused LANGUAGE pragma
Found:
{-# LANGUAGE NamedFieldPuns #-}
Perhaps you should remove it.
cardano-node/test/db-synthesizer/Main.hs:1:1-33: Warning: Unused LANGUAGE pragma
Found:
{-# LANGUAGE TypeApplications #-}
Perhaps you should remove it.
5 hints
=====================================================================
Note: to ignore a particular hint (e.g. "Reduce duplication"), write
this in the source file:
{-# ANN module ("HLint: ignore Reduce duplication" :: Text) #-}
You can also apply it just to a particular function, which is better:
{-# ANN funcName ("HLint: ignore Reduce duplication" :: Text) #-}
Loading