Don't mysteriously drop nets; allow arbitrary pair construction.

1 files changed, 47 insertions, 67 deletions

diff --git a/lace.rb b/lace.rb
index f6f871d..1d7f2f9 100644
--- a/lace.rb
+++ b/lace.rb
@@ -1,59 +1,7 @@
-require "bigdecimal"
 require "set"
 
 module Lace
 
-  extend self
-
-  def en(series, sigfigs, n)
-    return BigDecimal((10.0**Math.log10(n.to_f**series.to_f).round.to_f)**(1.0/series.to_f), sigfigs).round
-  end
-
-  HISTORIC_E24_FIX_TABLE = {
-    Math.log10(2.6)  => Math.log10(2.7),
-    Math.log10(2.9)  => Math.log10(3.0),
-    Math.log10(3.2)  => Math.log10(3.3),
-    Math.log10(3.5)  => Math.log10(3.6),
-    Math.log10(3.8)  => Math.log10(3.9),
-    Math.log10(4.2)  => Math.log10(4.3),
-    Math.log10(4.6)  => Math.log10(4.7),
-    }
-  def historic_e24_fix(n)
-    exp, rem = Math.log10(n).divmod(1)
-    HISTORIC_E24_FIX_TABLE.each do | accurate, historic |
-      rem = historic if (rem - accurate).abs <= 0.0001
-    end
-    return (10 ** (exp + rem)).round
-  end
-
-  def e3(n)
-    return historic_e24_fix(en(3, 2, n))
-  end
-
-  def e6(n)
-    return historic_e24_fix(en(6, 2, n))
-  end
-
-  def e12(n)
-    return historic_e24_fix(en(12, 2, n))
-  end
-
-  def e24(n)
-    return historic_e24_fix(en(24, 2, n))
-  end
-
-  def e48(n)
-    return en(48, 3, n)
-  end
-
-  def e96(n)
-    return en(96, 3, n)
-  end
-
-  def e192(n)
-    return en(192, 3, n)
-  end
-
   class Netlist
 
     attr_reader :components
@@ -66,18 +14,31 @@ module Lace
       edit(&p) if p
     end
 
+    def definitive_net(n)
+      nn = @nets[n.object_id]
+      return n if nn.object_id == n.object_id
+      return definitive_net(nn)
+    end
+
     def merge_nets(a, b)
-      into = @nets[[a.object_id, b.object_id].min]
-      if a.name
-        raise "Nets #{into.name} and #{a.name} merged!" if into.name and into.name != a.name
-        into.name = a.name
+      da = definitive_net(a)
+      db = definitive_net(b)
+      return da if da.object_id == db.object_id
+      into = @nets[[da.object_id, db.object_id].min]
+      if da.name
+        raise "Nets #{into.name} and #{da.name} merged!" if into.name and into.name != da.name
+        into.name = da.name
       end
-      if b.name
-        raise "Nets #{into.name} and #{b.name} merged!" if into.name and into.name != b.name
-        into.name = b.name
+      if db.name
+        raise "Nets #{into.name} and #{db.name} merged!" if into.name and into.name != db.name
+        into.name = db.name
+      end
+      @nets.each do | id, n |
+        dn = definitive_net(n)
+        if dn.object_id != into.object_id and (dn.object_id == da.object_id or dn.object_id == db.object_id)
+          @nets[id] = into
+        end
       end
-      @nets[a.object_id] = into
-      @nets[b.object_id] = into
       return into
     end
 
@@ -88,11 +49,18 @@ module Lace
     def comp(*args)
       c = Component.new(self, *args)
       @components[c.object_id] = c
+      return c
     end
 
     def net(*args)
       n = Net.new(self, *args)
       @nets[n.object_id] = n
+      return n
+    end
+
+    def pair(left, right)
+      x = Wireable.new(self, left, right)
+      return x
     end
 
     def real_refs
@@ -126,7 +94,7 @@ module Lace
         nodes = []
         refs.each do | ref, comp |
           comp.pins.each do | pin, pinnet |
-            nodes << {:ref => ref, :pin => pin} if @nets[pinnet].object_id == net.object_id
+            nodes << {:ref => ref, :pin => pin} if definitive_net(pinnet).object_id == net.object_id
           end
         end
         nets[name] = nodes if nodes.size > 1
@@ -225,9 +193,21 @@ END
       @right = right || left
     end
 
+    def left_net
+      x = left
+      return x if x.instance_of?(Net)
+      return x.left_net
+    end
+
+    def right_net
+      x = right
+      return x if x.instance_of?(Net)
+      return x.right_net
+    end
+
     def -(that)
-      @netlist.merge_nets(@right, that.left)
-      return Wireable.new(@netlist, @left, that.right)
+      @netlist.merge_nets(right_net, that.left_net)
+      return Wireable.new(@netlist, left_net, that.right_net)
     end
 
   end
@@ -263,13 +243,13 @@ END
     def [](pin)
       unless pins.member?(pin)
         n = @netlist.net
-        pins[pin] = n.object_id
+        pins[pin] = n
       end
-      return @netlist.nets[pins[pin]]
+      return pins[pin]
     end
 
     def desc
-      return "#{@value} #{@name}" if @name != @value
+      return "\"#{@value}\" #{@name}" if @name != @value
       return @name
     end