Changeset 2901 for driver/printer.ml


Ignore:
Timestamp:
Mar 19, 2013, 1:22:22 AM (8 years ago)
Author:
sacerdot
Message:
  1. backendPrinter renamed to printer
  2. Clight printing branched into the printer
File:
1 moved

Legend:

Unmodified
Added
Removed
  • driver/printer.ml

    r2898 r2901  
    201201    (fun n ->string_of_int (Extracted.Glue.int_of_matitanat (Obj.magic n)))
    202202 ; print_call_dest = (fun _ -> "")
    203  ; print_ext_seq = (fun ltl_lin_seq -> assert false )
     203 ; print_ext_seq = (fun ltl_lin_seq -> "TO BE IMPLEMENTED" )
    204204 }
    205205
     
    225225 let lines =
    226226  match pass with
     227   | Extracted.Compiler.Clight_pass
     228   | Extracted.Compiler.Clight_switch_removed_pass
     229   | Extracted.Compiler.Clight_label_pass
     230   | Extracted.Compiler.Clight_simplified_pass ->
     231      ClightPrinter.print_program ClightPrinter.Cost_plain (Obj.magic program)
    227232   | Extracted.Compiler.Rtl_separate_pass ->
    228233      beprint (Extracted.RTL_printer.print_RTL_program rTL_printing_params)
Note: See TracChangeset for help on using the changeset viewer.