Slot attributes have different values across symbol instances of a same
package. But 'gnetlist:get-package-attribute' does not like that. So the
value has to get directly extracted from the list returned by
'gnetlist:get-all-package-attributes'.
---

 gnetlist/scheme/gnet-drc2.scm |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/gnetlist/scheme/gnet-drc2.scm b/gnetlist/scheme/gnet-drc2.scm
index a72f2a4..0570ba4 100644
--- a/gnetlist/scheme/gnet-drc2.scm
+++ b/gnetlist/scheme/gnet-drc2.scm
@@ -430,7 +430,9 @@
        
        (let* ( (numslots_string (gnetlist:get-package-attribute uref 
"numslots"))
                (numslots (string->number numslots_string))
-               (slot_string (gnetlist:get-package-attribute uref "slot"))
+               (slot_string (let ((slots (gnetlist:get-all-package-attributes 
uref "slot")))
+                               (if (or (null? slots) (not (car slots)))
+                                   "unknown" (car slots))))
                (slot (string->number slot_string))
                )
          (let ()



_______________________________________________
geda-user mailing list
geda-user@moria.seul.org
http://www.seul.org/cgi-bin/mailman/listinfo/geda-user

Reply via email to