Emit LAMBDA directly from compiler
This commit is contained in:
parent
dfcccff748
commit
97e33a99da
@ -474,7 +474,6 @@ let rec opt_strip_annots (x : michelson) : michelson =
|
||||
|
||||
let optimize : michelson -> michelson =
|
||||
fun x ->
|
||||
let x = use_lambda_instr x in
|
||||
let x = flatten_seqs x in
|
||||
let x = opt_tail_fail x in
|
||||
let optimizers = [ peephole @@ peep2 opt_drop2 ;
|
||||
@ -487,4 +486,5 @@ let optimize : michelson -> michelson =
|
||||
let x = iterate_optimizer (sequence_optimizers optimizers) x in
|
||||
let x = opt_combine_drops x in
|
||||
let x = opt_strip_annots x in
|
||||
let x = use_lambda_instr x in
|
||||
x
|
||||
|
Loading…
Reference in New Issue
Block a user