Add missing Semigroup import for older GHC
This commit is contained in:
parent
2a16a4e8c1
commit
495e34d101
|
@ -21,6 +21,9 @@
|
||||||
-- Generic basic utility functions
|
-- Generic basic utility functions
|
||||||
module ShellCheck.Prelude where
|
module ShellCheck.Prelude where
|
||||||
|
|
||||||
|
import Data.Semigroup
|
||||||
|
|
||||||
|
|
||||||
-- Get element 0 or a default. Like `head` but safe.
|
-- Get element 0 or a default. Like `head` but safe.
|
||||||
headOrDefault _ (a:_) = a
|
headOrDefault _ (a:_) = a
|
||||||
headOrDefault def _ = def
|
headOrDefault def _ = def
|
||||||
|
|
Loading…
Reference in New Issue