(use-modules (ice-9 rdelim)
(netlist backend-getopt)
+ (netlist error)
(netlist schematic)
+ (netlist schematic toplevel)
(srfi srfi-26))
(define bomAM:open-input-file
(begin
(bomAM:printlist (append attriblist (list "quantity" "refdes")) #\,)
(newline)
- (bomAM:printbom (bomAM:components (schematic-packages toplevel-schematic)
+ (bomAM:printbom (bomAM:components (schematic-package-names (toplevel-schematic))
attriblist)
0))))))