Strip annots in PUSH type
This commit is contained in:
parent
0b0de1ea59
commit
fcb6647551
@ -431,6 +431,7 @@ let prim_type_args : prim -> int option = function
|
|||||||
| I_EMPTY_MAP -> Some 2
|
| I_EMPTY_MAP -> Some 2
|
||||||
| I_EMPTY_BIG_MAP -> Some 2
|
| I_EMPTY_BIG_MAP -> Some 2
|
||||||
| I_LAMBDA -> Some 2
|
| I_LAMBDA -> Some 2
|
||||||
|
| I_PUSH -> Some 1
|
||||||
(* _not_ I_CONTRACT! annot is important there *)
|
(* _not_ I_CONTRACT! annot is important there *)
|
||||||
(* but could include I_SELF, maybe? *)
|
(* but could include I_SELF, maybe? *)
|
||||||
| _ -> None
|
| _ -> None
|
||||||
|
Loading…
Reference in New Issue
Block a user