File tree Expand file tree Collapse file tree 4 files changed +13
-12
lines changed Expand file tree Collapse file tree 4 files changed +13
-12
lines changed Original file line number Diff line number Diff line change 16
16
" package.json"
17
17
],
18
18
"dependencies" : {
19
- "purescript-argonaut-core" : " ^6 .0.0" ,
20
- "purescript-codec" : " ^4 .0.0" ,
21
- "purescript-variant" : " ^7 .0.1 " ,
22
- "purescript-ordered-collections" : " ^2 .0.0" ,
19
+ "purescript-argonaut-core" : " ^7 .0.0" ,
20
+ "purescript-codec" : " ^5 .0.0" ,
21
+ "purescript-variant" : " ^8 .0.0 " ,
22
+ "purescript-ordered-collections" : " ^3 .0.0" ,
23
23
"purescript-type-equality" : " ^4.0.0"
24
24
},
25
25
"devDependencies" : {
26
- "purescript-argonaut-codecs" : " ^8 .0.0" ,
27
- "purescript-quickcheck" : " ^7 .0.0"
26
+ "purescript-argonaut-codecs" : " ^9 .0.0" ,
27
+ "purescript-quickcheck" : " ^8 .0.0"
28
28
}
29
29
}
Original file line number Diff line number Diff line change 6
6
"test" : " pulp test"
7
7
},
8
8
"devDependencies" : {
9
- "pulp" : " ^15 .0.0" ,
10
- "purescript" : " ^0.14 .0" ,
9
+ "pulp" : " ^16 .0.0" ,
10
+ "purescript" : " ^0.15 .0" ,
11
11
"purescript-psa" : " ^0.8.2" ,
12
12
"rimraf" : " ^3.0.0"
13
13
}
Original file line number Diff line number Diff line change @@ -51,6 +51,7 @@ import Data.Tuple (Tuple(..))
51
51
import Foreign.Object as FO
52
52
import Partial.Unsafe (unsafePartial )
53
53
import Prim.Row as Row
54
+ import Type.Proxy (Proxy )
54
55
import Unsafe.Coerce (unsafeCoerce )
55
56
56
57
-- | Codec type for `Json` values.
@@ -253,10 +254,10 @@ record = GCodec (pure {}) (Star \val → writer (Tuple val L.Nil))
253
254
-- | Used with `record` to define codecs for record types that encode into JSON
254
255
-- | objects of the same shape. See the comment on `record` for an example.
255
256
recordProp
256
- ∷ ∀ proxy p a r r'
257
+ ∷ ∀ p a r r'
257
258
. IsSymbol p
258
259
⇒ Row.Cons p a r r'
259
- ⇒ proxy p
260
+ ⇒ Proxy p
260
261
→ JsonCodec a
261
262
→ JPropCodec (Record r )
262
263
→ JPropCodec (Record r' )
Original file line number Diff line number Diff line change @@ -89,10 +89,10 @@ variant ∷ JsonCodec (Variant ())
89
89
variant = GCodec (ReaderT (Left <<< UnexpectedValue )) (Star case_)
90
90
91
91
variantCase
92
- ∷ ∀ proxy l a r r'
92
+ ∷ ∀ l a r r'
93
93
. IsSymbol l
94
94
⇒ R.Cons l a r r'
95
- ⇒ proxy l
95
+ ⇒ Proxy l
96
96
→ Either a (JsonCodec a )
97
97
→ JsonCodec (Variant r )
98
98
→ JsonCodec (Variant r' )
You can’t perform that action at this time.
0 commit comments