av/haskell-cron-matcher
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Improve code style

Browse Source
This commit is contained in:
Anton Vakhrushev 2019-03-09 22:36:36 +03:00
parent c96cc544e4
commit ab6300eede
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/Pattern.hs
View File

@ -33,12 +33,12 @@ parse text
isValid = checkFields fields isValid = checkFields fields
createPattern xs = createPattern xs =
Pattern Pattern
{ cminute = head xs { cminute = head xs
, chour = xs !! 1 , chour = xs !! 1
, cday = xs !! 2 , cday = xs !! 2
, cmonth = xs !! 3 , cmonth = xs !! 3
, cweek = xs !! 4 , cweek = xs !! 4
} }
checkFields :: [Maybe Field] -> Bool checkFields :: [Maybe Field] -> Bool
checkFields xs checkFields xs