Skip to content

Commit e9330dc

Browse files
authored
Updates for 0.11.1 (#56)
* Updates for 0.11 * Fix the build * 0.11.1
1 parent cb6be8d commit e9330dc

File tree

6 files changed

+35
-25
lines changed

6 files changed

+35
-25
lines changed

bower.json

Lines changed: 8 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -12,15 +12,15 @@
1212
"url": "git://github.com/purescript-contrib/purescript-profunctor-lenses.git"
1313
},
1414
"dependencies": {
15-
"purescript-const": "^2.0.0",
16-
"purescript-functors": "^1.0.0",
17-
"purescript-identity": "^2.0.0",
18-
"purescript-profunctor": "^2.0.0",
19-
"purescript-sets": "^2.0.0",
20-
"purescript-unsafe-coerce": "^2.0.0",
21-
"purescript-transformers": "^2.0.1"
15+
"purescript-const": "^3.0.0",
16+
"purescript-functors": "^2.0.0",
17+
"purescript-identity": "^3.0.0",
18+
"purescript-profunctor": "^3.0.0",
19+
"purescript-sets": "^3.0.0",
20+
"purescript-unsafe-coerce": "^3.0.0",
21+
"purescript-transformers": "^3.0.0"
2222
},
2323
"devDependencies": {
24-
"purescript-console": "^2.0.0"
24+
"purescript-console": "^3.0.0"
2525
}
2626
}

package.json

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -2,13 +2,13 @@
22
"private": true,
33
"scripts": {
44
"clean": "rimraf output && rimraf .pulp-cache",
5-
"build": "pulp build --censor-lib --strict",
5+
"build": "pulp build -- --censor-lib --strict",
66
"test": "pulp test"
77
},
88
"devDependencies": {
9-
"pulp": "^9.0.1",
10-
"purescript-psa": "^0.3.9",
11-
"purescript": "^0.10.1",
9+
"pulp": "^11.0.0",
10+
"purescript-psa": "^0.5.0",
11+
"purescript": "^0.11.1",
1212
"rimraf": "^2.5.4"
1313
}
1414
}

src/Data/Lens/Fold.purs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -173,7 +173,7 @@ replicated i (Forget a) = Forget (go i a)
173173
go n x = x <> go (n - 1) x
174174

175175
-- | Folds over a `Foldable` container.
176-
folded :: forall g a b t r. (Monoid r, Foldable g) => Fold r (g a) b a t
176+
folded :: forall g a b t r. Monoid r => Foldable g => Fold r (g a) b a t
177177
folded (Forget a) = Forget (foldMap a)
178178

179179
-- | Builds a `Fold` using an unfold.

src/Data/Lens/Iso.purs

Lines changed: 14 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -37,7 +37,7 @@ auf l = withIso l \sa bt f g e -> bt (f (rmap sa g) e)
3737
under :: forall s t a b. AnIso s t a b -> (t -> s) -> b -> a
3838
under l = withIso l \sa bt ts -> sa <<< ts <<< bt
3939

40-
-- | If `a1` is obtained from `a` by removing a single value, then
40+
-- | If `a1` is obtained from `a` by removing a single value, then
4141
-- | `Maybe a1` is isomorphic to `a`.
4242
non :: forall a. Eq a => a -> Iso' (Maybe a) a
4343
non def = iso (fromMaybe def) g
@@ -53,9 +53,19 @@ uncurried = iso uncurry curry
5353
flipped :: forall a b c d e f. Iso (a -> b -> c) (d -> e -> f) (b -> a -> c) (e -> d -> f)
5454
flipped = iso flip flip
5555

56-
mapping :: forall s t a b f g. (Functor f, Functor g) => AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
56+
mapping
57+
:: forall s t a b f g
58+
. Functor f
59+
=> Functor g
60+
=> AnIso s t a b
61+
-> Iso (f s) (g t) (f a) (g b)
5762
mapping l = withIso l \sa bt -> iso (map sa) (map bt)
5863

59-
dimapping :: forall s ss t tt a aa b bb p q
60-
. (Profunctor p, Profunctor q) => AnIso s t a b -> AnIso ss tt aa bb -> Iso (p a ss) (q b tt) (p s aa) (q t bb)
64+
dimapping
65+
:: forall s ss t tt a aa b bb p q
66+
. Profunctor p
67+
=> Profunctor q
68+
=> AnIso s t a b
69+
-> AnIso ss tt aa bb
70+
-> Iso (p a ss) (q b tt) (p s aa) (q t bb)
6171
dimapping f g = withIso f \sa bt -> withIso g \ssaa bbtt -> iso (dimap sa ssaa) (dimap bt bbtt)

src/Data/Lens/Iso/Newtype.purs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -3,5 +3,5 @@ module Data.Lens.Iso.Newtype where
33
import Data.Lens.Iso (Iso, iso)
44
import Data.Newtype (class Newtype, wrap, unwrap)
55

6-
_Newtype :: forall t a s b. (Newtype t a, Newtype s b) => Iso t s a b
6+
_Newtype :: forall t a s b. Newtype t a => Newtype s b => Iso t s a b
77
_Newtype = iso unwrap wrap

src/Data/Lens/Setter.purs

Lines changed: 7 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -103,25 +103,25 @@ assign p b = modify (set p b)
103103
modifying :: forall s a b m. MonadState s m => Setter s s a b -> (a -> b) -> m Unit
104104
modifying p f = modify (over p f)
105105

106-
addModifying :: forall s a m. (MonadState s m, Semiring a) => Setter' s a -> a -> m Unit
106+
addModifying :: forall s a m. MonadState s m => Semiring a => Setter' s a -> a -> m Unit
107107
addModifying p = modifying p <<< add
108108

109-
mulModifying :: forall s a m. (MonadState s m, Semiring a) => Setter' s a -> a -> m Unit
109+
mulModifying :: forall s a m. MonadState s m => Semiring a => Setter' s a -> a -> m Unit
110110
mulModifying p = modifying p <<< flip mul
111111

112-
subModifying :: forall s a m. (MonadState s m, Ring a) => Setter' s a -> a -> m Unit
112+
subModifying :: forall s a m. MonadState s m => Ring a => Setter' s a -> a -> m Unit
113113
subModifying p = modifying p <<< flip sub
114114

115-
divModifying :: forall s a m. (MonadState s m, EuclideanRing a) => Setter' s a -> a -> m Unit
115+
divModifying :: forall s a m. MonadState s m => EuclideanRing a => Setter' s a -> a -> m Unit
116116
divModifying p = modifying p <<< flip div
117117

118-
disjModifying :: forall s a m. (MonadState s m, HeytingAlgebra a) => Setter' s a -> a -> m Unit
118+
disjModifying :: forall s a m. MonadState s m => HeytingAlgebra a => Setter' s a -> a -> m Unit
119119
disjModifying p = modifying p <<< flip disj
120120

121-
conjModifying :: forall s a m. (MonadState s m, HeytingAlgebra a) => Setter' s a -> a -> m Unit
121+
conjModifying :: forall s a m. MonadState s m => HeytingAlgebra a => Setter' s a -> a -> m Unit
122122
conjModifying p = modifying p <<< flip conj
123123

124-
appendModifying :: forall s a m. (MonadState s m, Semigroup a) => Setter' s a -> a -> m Unit
124+
appendModifying :: forall s a m. MonadState s m => Semigroup a => Setter' s a -> a -> m Unit
125125
appendModifying p = modifying p <<< flip append
126126

127127
assignJust :: forall s a b m. MonadState s m => Setter s s a (Maybe b) -> b -> m Unit

0 commit comments

Comments
 (0)