Compare commits
3 commits
05428fa520
...
4e3feae5e6
| Author | SHA1 | Date | |
|---|---|---|---|
| 4e3feae5e6 | |||
| 67b691d410 | |||
| eeac31df24 |
2 changed files with 12 additions and 2 deletions
|
|
@ -62,14 +62,14 @@
|
|||
devShells.default = haskellPackages.shellFor {
|
||||
inherit (self.checks.${system}.pre-commit-check) shellHook;
|
||||
|
||||
packages = _:
|
||||
pkgs.lib.filter (x: x != null) [ self.packages.${system}.default ];
|
||||
packages = _: [ self.packages.${system}.default ];
|
||||
|
||||
withHoogle = true;
|
||||
|
||||
nativeBuildInputs = with pkgs; [
|
||||
haskellPackages.haskell-language-server
|
||||
haskellPackages.fourmolu
|
||||
haskellPackages.hspec-discover
|
||||
cabal-install
|
||||
ghcid
|
||||
nixfmt
|
||||
|
|
|
|||
|
|
@ -1,6 +1,8 @@
|
|||
-- | Internal module in order to facilitate testability.
|
||||
module HCat.Internal where
|
||||
|
||||
import Data.Text (Text)
|
||||
|
||||
-- | @parseArgs@ takes a list of strings and returns a single FilePath if there was exactly one element.
|
||||
--
|
||||
-- >>> parseArgs ["foo"]
|
||||
|
|
@ -28,3 +30,11 @@ chunksOf n xs@(_ : _)
|
|||
| otherwise =
|
||||
let (chunk, rest) = splitAt n xs
|
||||
in chunk : chunksOf n rest
|
||||
|
||||
-- | @wordWrap@ splits the given Text if it is longer than the given margin.
|
||||
--
|
||||
-- >>> :set -XOverloadedStrings
|
||||
-- >>> wordWrap 3 $ "abcdef"
|
||||
-- ["abc", "def"]
|
||||
wordWrap :: Int -> Text -> [Text]
|
||||
wordWrap = undefined
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue