tangled
alpha
login
or
join now
futur.blue
/
pegasus
57
fork
atom
objective categorical abstract machine language personal data server
57
fork
atom
overview
issues
2
pulls
pipelines
Don't attempt to parse CBOR record to blob ref
futur.blue
2 weeks ago
d2ce26b1
1ced8376
verified
This commit was signed with the committer's
known signature
.
futur.blue
SSH Key Fingerprint:
SHA256:QHGqHWNpqYyw9bt8KmPuJIyeZX9SZewBZ0PR1COtKQ0=
+3
-3
1 changed file
expand all
collapse all
unified
split
mist
lib
lex.ml
+3
-3
mist/lib/lex.ml
···
99
100
let of_cbor encoded : repo_record =
101
let decoded = Dag_cbor.decode encoded in
102
-
match of_ipld decoded with
103
-
| `LexMap m ->
104
-
m
105
| _ ->
106
raise (Failure "Decoded non-record value")
···
99
100
let of_cbor encoded : repo_record =
101
let decoded = Dag_cbor.decode encoded in
102
+
match decoded with
103
+
| `Map m ->
104
+
String_map.map of_ipld m
105
| _ ->
106
raise (Failure "Decoded non-record value")