Skip to content

Commit

Permalink
Fixed choice: Remove superfluous enabling of MagicHash
Browse files Browse the repository at this point in the history
  • Loading branch information
jeltsch committed Jan 16, 2025
1 parent 835860d commit fe85945
Show file tree
Hide file tree
Showing 7 changed files with 0 additions and 12 deletions.
2 changes: 0 additions & 2 deletions src/Database/LSMTree/Internal/ChecksumHandle.hs
Original file line number Diff line number Diff line change
@@ -1,5 +1,3 @@
{-# LANGUAGE MagicHash #-}

module Database.LSMTree.Internal.ChecksumHandle
(
-- * Checksum handles
Expand Down
2 changes: 0 additions & 2 deletions src/Database/LSMTree/Internal/Config.hs
Original file line number Diff line number Diff line change
@@ -1,5 +1,3 @@
{-# LANGUAGE MagicHash #-}

module Database.LSMTree.Internal.Config (
LevelNo (..)
-- * Table configuration
Expand Down
2 changes: 0 additions & 2 deletions src/Database/LSMTree/Internal/Merge.hs
Original file line number Diff line number Diff line change
@@ -1,5 +1,3 @@
{-# LANGUAGE MagicHash #-}

-- | The 'Merge' type and its functions are not intended for concurrent use.
-- Concurrent access should therefore be sequentialised using a suitable
-- concurrency primitive, such as an 'MVar'.
Expand Down
2 changes: 0 additions & 2 deletions src/Database/LSMTree/Internal/MergingRun.hs
Original file line number Diff line number Diff line change
@@ -1,5 +1,3 @@
{-# LANGUAGE MagicHash #-}

{- HLINT ignore "Use when" -}

-- | An incremental merge of multiple runs.
Expand Down
1 change: 0 additions & 1 deletion src/Database/LSMTree/Internal/Run.hs
Original file line number Diff line number Diff line change
Expand Up @@ -2,7 +2,6 @@
{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE DerivingVia #-}
{-# LANGUAGE MagicHash #-}
{-# LANGUAGE RecordWildCards #-}

-- | Runs of sorted key\/value data.
Expand Down
1 change: 0 additions & 1 deletion src/Database/LSMTree/Internal/RunAcc.hs
Original file line number Diff line number Diff line change
@@ -1,4 +1,3 @@
{-# LANGUAGE MagicHash #-}
{-# LANGUAGE RecordWildCards #-}
{- HLINT ignore "Redundant lambda" -}
{- HLINT ignore "Use camelCase" -}
Expand Down
2 changes: 0 additions & 2 deletions src/Database/LSMTree/Internal/RunBuilder.hs
Original file line number Diff line number Diff line change
@@ -1,5 +1,3 @@
{-# LANGUAGE MagicHash #-}

-- | A mutable run ('RunBuilder') that is under construction.
--
module Database.LSMTree.Internal.RunBuilder (
Expand Down

0 comments on commit fe85945

Please sign in to comment.