balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Shell: display 12 characters for short Base48.

Browse Source 
A full block/operation identifier is around 53 characters.
This commit is contained in:
Grégoire Henry 2016-10-13 17:05:53 +02:00
parent 1ce2643dc7
commit 3f864ae113
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/utils/hash.ml
View File

@ -89,7 +89,7 @@ module Make_SHA256 (K : Name) = struct
| _ -> Format.kasprintf failwith "Unexpected hash (%s)" K.name | _ -> Format.kasprintf failwith "Unexpected hash (%s)" K.name
let to_b48check s = Base48.encode (Hash s) let to_b48check s = Base48.encode (Hash s)
let to_short_b48check s = String.sub (to_b48check s) 0 8 let to_short_b48check s = String.sub (to_b48check s) 0 12
let compare = String.compare let compare = String.compare
let equal : t -> t -> bool = (=) let equal : t -> t -> bool = (=)