Project

General

Profile

« Previous | Next » 

Revision 50fb3395

Added by Arnaud Dieumegard about 6 years ago

Use clause printing correction

View differences:

src/backends/VHDL/mini_vhdl_ast_pp.ml
534 534 
        fun x  ->
535 535 
          (match x.use_clause with
536 536 
          | None -> ();
537 
          | Some e -> ((__0 ()) fmt) e);
537 
          | Some e -> ((__0 ()) fmt) e; Format.fprintf fmt ";");
538 538 
          (match x.declaration with
539 539 
          | None -> ();
540 540 
          | Some e -> ((__1 ()) fmt) e);
......
808 808 
                (fun sep  ->
809 809 
                  fun x  ->
810 810 
                    if sep then Format.fprintf fmt ";@;";
811 
                      ((__3 ()) fmt) x;
811 
                    ((__3 ()) fmt) x;
812 
                    Format.fprintf fmt ";";
812 813 
                      true) false x))) x.contexts);
813 814 
          (match x.c_declarations with
814 815 
          | [] -> ()

Also available in: Unified diff