Stay in GETCOORDS if there are more coord prompts.
[geda-gaf/berndj.git] / symbols / geda-clib.scm
blob5815009b7484b6518c22aab6a33a3e99095be99c
1 ;                                                         -*-Scheme-*-
2 ;;;
3 ;;; Add the default component libraries
4 ;;;
6 (define geda-sym-path (build-path geda-data-path "sym"))
8 ; NOTE: Some of the below component libraries below are commented out.
9 ;       This was done because there are conflicting filenames within these
10 ;       libraries.  
11 (for-each
12  (lambda (dir)
13    (if (list? dir)
14        (component-library (build-path geda-sym-path (car dir)) (cadr dir))
15        (component-library (build-path geda-sym-path dir)))
16    )
17  (reverse '(
18     "local"
19   ; Generic symbols
20     ("abstract" "Abstract symbols (generic)")
21     ("analog" "Basic devices")
22     ("connector" "Connectors (generic)")
23     ("diode" "Diodes (generic)")
24     ("io" "Input/output (generic)")
25     ("power" "Power rails")
26     ("radio" "Radio elements (generic)")
27     ("switch" "Switches (generic)")
28     ("titleblock" "Titleblocks (generic)")
29     ("IEC417" "IEC 60417")
30   ; Common logic series
31     ("74" "74-series logic")
32     ("4000" "4000-series logic")
33     ("ecl" "ECL logic")
34   ; Simulation
35     ("cascade" "Cascade simulation elements")
36     ("spice" "SPICE simulation elements")
37     ("switcap" "SWITCAP simulation elements")
38   ; ASIC design
39     ("asic" "Basic devices (ASIC)")
40     ("asicpads" "Contact pads (ASIC)")
41   ; Manufacturers
42     ("allegro" "Allegro Microsystems")
43     ("altera" "Altera")
44     ("amphenol" "Connectors (Amphenol)")
45     ("apex" "Apex Microtechnology")
46     ("dec" "DEC")
47     ("idt" "IDT")
48     ("irf" "International Rectifier")
49     ("lattice" "Lattice Semiconductor")
50     ("linear" "Linear Technology")
51     ("maxim" "Maxim/Dallas")
52     ("minicircuits" "Mini-Circuits")
53     ("national" "National Semiconductor")
54     ("philips" "Philips Electronics")
55     ("st" "ST Microelectronics")
56     ("xilinx" "Xilinx")
57   ; Misc. stuff
58     ("bus" "PC104 bus")
59     ("memory" "Memory devices (misc)")
60     ("micro" "Microcontrollers (misc)")
61     ("transistor" "Transistors (misc)")
62     ("tube" "Vacuum tubes (misc)")
63     ("rf" "RF elements (misc)")
64     ("pla" "Programmable logic arrays (misc)")
65     ("supervisor" "Microprocessor supervisors (misc)")
66     ("opto" "Optocouplers (misc)")
67     ("relay" "Relays (misc)")
68     ("misc" "Misc. unsorted symbols")
70   ; Other
72     ;"verilog"
73     ;"vhdl"
74     ;"gnetman"
75     )))