From ab8dc55b9ba27393cde23d0369202c056d688ea2 Mon Sep 17 00:00:00 2001
From: Johann Rudloff <johann@sinyax.net>
Date: Thu, 18 Jul 2019 19:38:22 +0200
Subject: [PATCH] Ignore components during netlist export when field
 "spice_netlist_enabled" is set to "N".

---
 lib/export_pspice.ml | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lib/export_pspice.ml b/lib/export_pspice.ml
index 1308097..298b5fe 100644
--- a/lib/export_pspice.ml
+++ b/lib/export_pspice.ml
@@ -3,7 +3,9 @@ open List
 open Connectiongraph
 open Schematic
 
-let comp_ignored comp = comp.Comp.ref.[0] = '#'
+let comp_ignored comp =
+  comp.Comp.ref.[0] = '#'
+  || Fields.get comp.Comp.fields Fields.Keys.spice_netlist_enabled "Y" <> "Y"
 
 let write_comp outch pin_cache comp =
   let pin_nets = map (fun pin ->
-- 
2.38.5