Alpha: add padding to Contract.encoding
This commit is contained in:
parent
9a43902f03
commit
e3b6a0a568
@ -63,7 +63,7 @@ let encoding =
|
||||
Signature.Public_key_hash.encoding
|
||||
(function Implicit k -> Some k | _ -> None)
|
||||
(fun k -> Implicit k) ;
|
||||
case (Tag 1) Contract_hash.encoding
|
||||
case (Tag 1) (Fixed.add_padding Contract_hash.encoding 1)
|
||||
~title:"Originated"
|
||||
(function Originated k -> Some k | _ -> None)
|
||||
(fun k -> Originated k) ;
|
||||
|
Loading…
Reference in New Issue
Block a user