Skip to content

Commit

Permalink
Fix linting and formatting in CI
Browse files Browse the repository at this point in the history
  • Loading branch information
jasagredo committed Jan 10, 2025
1 parent fef4eb9 commit 54ac1b2
Show file tree
Hide file tree
Showing 5 changed files with 6 additions and 10 deletions.
1 change: 0 additions & 1 deletion ouroboros-consensus-cardano/app/DBAnalyser/Parsers.hs
Original file line number Diff line number Diff line change
@@ -1,6 +1,5 @@
{-# LANGUAGE ApplicativeDo #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE PatternSynonyms #-}

module DBAnalyser.Parsers (
BlockType (..)
Expand Down
10 changes: 4 additions & 6 deletions ouroboros-consensus-cardano/app/snapshot-converter.hs
Original file line number Diff line number Diff line change
@@ -1,12 +1,10 @@
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE TupleSections #-}
{-# LANGUAGE TypeApplications #-}
{-# LANGUAGE ViewPatterns #-}

module Main (main) where
Expand Down Expand Up @@ -59,13 +57,13 @@ data Format
deriving (Show, Read)

data Config = Config
{ from :: Format
{ from :: Format
-- ^ Which format the input snapshot is in
, inpath :: FilePath
, inpath :: FilePath
-- ^ Path to the input snapshot
, to :: Format
, to :: Format
-- ^ Which format the output snapshot must be in
, outpath :: FilePath
, outpath :: FilePath
-- ^ Path to the output snapshot
, writeChecksum :: Flag "DoDiskSnapshotChecksum"
-- ^ Write and check checksums
Expand Down
2 changes: 0 additions & 2 deletions ouroboros-consensus-cardano/test/tools-test/Main.hs
Original file line number Diff line number Diff line change
@@ -1,5 +1,3 @@
{-# LANGUAGE PatternSynonyms #-}

module Main (main) where

import qualified Cardano.Tools.DBAnalyser.Block.Cardano as Cardano
Expand Down
Original file line number Diff line number Diff line change
@@ -1,7 +1,6 @@
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE NumericUnderscores #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE TypeApplications #-}

module Test.Ouroboros.Storage.LedgerDB.SnapshotPolicy (tests) where
Expand Down
2 changes: 2 additions & 0 deletions scripts/ci/run-stylish.sh
Original file line number Diff line number Diff line change
Expand Up @@ -27,6 +27,8 @@ esac

$fdcmd --full-path "$path" \
--extension hs \
--exclude ouroboros-consensus/src/ouroboros-consensus/Ouroboros/Consensus/Ledger/Dual.hs \
--exclude ouroboros-consensus/src/ouroboros-consensus/Ouroboros/Consensus/Ledger/Extended.hs \
--exec-batch stylish-haskell -c .stylish-haskell.yaml -i

case "$(uname -s)" in
Expand Down

0 comments on commit 54ac1b2

Please sign in to comment.