Skip to content

Commit ba30adc

Browse files
authored
Import Data.Generic.Rep from prelude (#64)
1 parent 3ade38c commit ba30adc

File tree

4 files changed

+250
-252
lines changed

4 files changed

+250
-252
lines changed

bower.json

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -18,7 +18,6 @@
1818
"dependencies": {
1919
"purescript-fixed-points": "main",
2020
"purescript-datetime": "master",
21-
"purescript-generics-rep": "master",
2221
"purescript-transformers": "master",
2322
"purescript-lists": "master",
2423
"purescript-prelude": "master",

spago.dhall

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -6,7 +6,6 @@
66
, "datetime"
77
, "effect"
88
, "fixed-points"
9-
, "generics-rep"
109
, "lists"
1110
, "numbers"
1211
, "parsing"

src/Data/Formatter/DateTime.purs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -32,12 +32,12 @@ import Data.Formatter.Internal (foldDigits)
3232
import Data.Formatter.Parser.Number (parseDigit)
3333
import Data.Formatter.Parser.Utils (runP, oneOfAs)
3434
import Data.Generic.Rep (class Generic)
35-
import Data.Generic.Rep.Show (genericShow)
3635
import Data.Int as Int
3736
import Data.List as List
3837
import Data.Maybe (Maybe(..), fromMaybe, isJust, maybe)
3938
import Data.Newtype (unwrap)
4039
import Data.Ord (abs)
40+
import Data.Show.Generic (genericShow)
4141
import Data.String as Str
4242
import Data.String.CodeUnits as CU
4343
import Data.Time as T
@@ -320,7 +320,7 @@ parseSignedInt ∷ ∀ m
320320
P.ParserT String m Int
321321
parseSignedInt maxLength validators errMsg = do
322322
isNegative ← isJust <$> PC.optionMaybe (PS.char '-')
323-
(if isNegative then negate else identity) <$> parseInt maxLength validators errMsg
323+
(if isNegative then negate else identity) <$> parseInt maxLength validators errMsg
324324

325325
parseInt m
326326
. Monad m

0 commit comments

Comments
 (0)