Project

General

Profile

Revision d4c98bae src/backends/VHDL/vhdl_ast_map.ml

View differences:

src/backends/VHDL/vhdl_ast_map.ml
481 481
        { name; generics; ports; declaration; stmts }
482 482

  
483 483
    method vhdl_package_t : vhdl_package_t -> vhdl_package_t=
484
      fun { name; shared_defs; shared_decls }  ->
484
      fun { name; shared_defs; shared_decls; shared_uses }  ->
485 485
        let name = self#vhdl_name_t name  in
486 486
        let shared_defs = self#list self#vhdl_definition_t shared_defs  in
487 487
        let shared_decls = self#list self#vhdl_declaration_t shared_decls  in
488
        { name; shared_defs; shared_decls }
488
        let shared_uses = self#list self#vhdl_load_t shared_uses  in
489
        { name; shared_defs; shared_decls; shared_uses }
489 490

  
490 491
    method vhdl_load_t : vhdl_load_t -> vhdl_load_t=
491 492
      fun x  ->

Also available in: Unified diff