diff options
Diffstat (limited to 'scheduling/BTLcommonaux.ml')
| -rw-r--r-- | scheduling/BTLcommonaux.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scheduling/BTLcommonaux.ml b/scheduling/BTLcommonaux.ml index 577e4828..11a7ee7f 100644 --- a/scheduling/BTLcommonaux.ml +++ b/scheduling/BTLcommonaux.ml @@ -6,9 +6,9 @@ open RTLcommonaux let undef_node = -1 -let mk_iinfo _inumb _pcond = { inumb = _inumb; pcond = _pcond; visited = false; liveins = Regset.empty } +let mk_iinfo _inumb _opt_info = { inumb = _inumb; opt_info = _opt_info; visited = false; liveins = Regset.empty } -let def_iinfo () = { inumb = undef_node; pcond = None; visited = false; liveins = Regset.empty } +let def_iinfo () = { inumb = undef_node; opt_info = None; visited = false; liveins = Regset.empty } let mk_binfo _bnumb _s_output_regs _typing = { |