gEDA-cvs: CVS update: gnet-spice-sdb.scm

[cvspsrv@xxxxxxxx]

  User: sdb     
  Date: 06/03/10 08:51:33

  Modified:    .        gnet-spice-sdb.scm
  Log:
  Added "m" attribute to PMOS and NMOS per request of Peter Kaiser.
  
  
  
  
  Revision  Changes    Path
  1.18      +4 -3      eda/geda/devel/gnetlist/scheme/gnet-spice-sdb.scm
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: gnet-spice-sdb.scm
  ===================================================================
  RCS file: /home/cvspsrv/cvsroot/eda/geda/devel/gnetlist/scheme/gnet-spice-sdb.scm,v
  retrieving revision 1.17
  retrieving revision 1.18
  diff -u -b -r1.17 -r1.18
  --- gnet-spice-sdb.scm	4 Jan 2006 14:37:22 -0000	1.17
  +++ gnet-spice-sdb.scm	10 Mar 2006 13:51:33 -0000	1.18
  @@ -1,4 +1,4 @@
  -;;; $Id: gnet-spice-sdb.scm,v 1.17 2006/01/04 14:37:22 sdb Exp $
  +;;; $Id: gnet-spice-sdb.scm,v 1.18 2006/03/10 13:51:33 sdb Exp $
   ;;;
   ;;; gEDA - GNU Electronic Design Automation
   ;;; gnetlist - GNU Netlist
  @@ -81,6 +81,7 @@
   ;;  12.27.2005 -- Fix bug discovered by John Doty: spice-IO pins with refdes greater
   ;;                than P9 were sorted incorrectly (as strings).  Now they are sorted
   ;;                as numbers.
  +;;  3.10.2006 -- Added "m" attribute to PMOS and NMOS per request of Peter Kaiser.
   ;;**********************************************************************************
   ;;
   ;;  Organization of gnet-spice-sdb.scm file:
  @@ -987,7 +988,7 @@
     (lambda (package port)
       (debug-spew (string-append "Found PMOS transistor.  Refdes = " package "\n"))
       (spice-sdb:write-prefix package "M" port)
  -    (let ((attrib-list (list "l" "w" "as" "ad" "pd" "ps" "nrd" "nrs" "temp" "ic")))
  +    (let ((attrib-list (list "l" "w" "as" "ad" "pd" "ps" "nrd" "nrs" "temp" "ic" "m")))
         (spice-sdb:write-transistor-diode package "PMOS" attrib-list port))
     )
   )
  @@ -999,7 +1000,7 @@
     (lambda (package port)
       (debug-spew (string-append "Found NMOS transistor.  Refdes = " package "\n"))
       (spice-sdb:write-prefix package "M" port)
  -    (let ((attrib-list (list "l" "w" "as" "ad" "pd" "ps" "nrd" "nrs" "temp" "ic")))
  +    (let ((attrib-list (list "l" "w" "as" "ad" "pd" "ps" "nrd" "nrs" "temp" "ic" "m")))
         (spice-sdb:write-transistor-diode package "NMOS" attrib-list port))
     )
   )