Project

General

Profile

« Previous | Next » 

Revision 768e8c07

Added by Arnaud Dieumegard about 6 years ago

PP for packages in minivhdl

View differences:

src/backends/VHDL/mini_vhdl_ast_pp.ml
142 142 
                    (fun sep  ->
143 143 
                       fun x  ->
144 144 
                         if sep then Format.fprintf fmt "@;";
145 
                         Format.fprintf fmt "package ";
145 146 
                         ((__1 ()) fmt) x;
146 147 
                         true) false x))) x.packages;
147 148 
           Format.fprintf fmt "@]")

Also available in: Unified diff