gnetlist: spice-sdb: write provided subckt parameters from v

[Dan White]

For input pages defining a subcircuit (has a
"device=spice-subcircuit-LL" attribute). Information is provided
through the value= attribute attached to the "spice-subcircuit-LL"
symbol.

E.g.:
.subckt name n1 n2 n3 n4 M=1 foo=43
*contents
.ends

[Dan White (etihwnad)]

This (updated) patch makes spice-sdb use the "value=" attribute atteched to the symbol with "device=spice-subcircuit-LL" to pass subcircuit parameters.

The patch also lives in the "whiteaudio" branch at:
git://repo.or.cz/geda-gaf/whiteaudio.git
as commit:
cb0bf864cd3a1a7e38559ebc74669e78792a4b7b

[Abhijit (abhijit86k)]

Most useful!
Thanks! Has this been included into the main gEDA distribution?
~Abhijit

[Dan White (etihwnad)]

On Fri, May 3, 2013 at 1:36 PM, Abhijit <email address hidden> wrote:

> Most useful!
> Thanks! Has this been included into the main gEDA distribution?
>

Thanks for the kind words, sorry for the delay.

As far as I know, it has not been included.

Dan

--
SDG
www.whiteaudio.com

[tvrusso (russo-bogodyn)]

This is a great patch and it would be terrific if it would be included in the distribution.

[Dan White (etihwnad)]

.. and a minor cleanup to the previous patch.

Applies to both the current master/HEAD and stable-1.8 branches.

[Gag (renaud-gaglione)]

Thank you for this patch !
I would recommend to add it to stable distribution !
RG

[Gag (renaud-gaglione)]

After playong a little with above patch, I have tried to write a complement, wich suits better to my needs, ie to give some parameters to a geda symbol, which is linked to a .subckt file, whith an attribute called param. I do not want to use value, because I am using value for BOM, and and try to have the same schematic for simulation and for PCB...

In gnet-spice-sdb.scm, in write-ic function, just add the lines between ";;;;;; mod ;;;;;". Sorry, but I do not know now how tu use diff and generate proper patch...

 ;; ---- file holds a subcircuit ----
       ((string=? file-type ".SUBCKT")
        (begin
   (debug-spew (string-append "Found .SUBCKT with model-file and model-name for " package "\n"))
                 (spice-sdb:write-prefix package "X" port) ;; this prepends an "X" to the refdes if needed, since we have a .subckt
                 (spice-sdb:write-component-no-value package port)
 ;; (display (string-append model-name "\n" ) port)
                (display (string-append model-name " " ) port)

;;;;;;;;;;;;;;;; mod RG ;;;;;;;;;;;;;;;;;;;;
    (let ((value (gnetlist:get-package-attribute package "param")))
        (if (not (string=? value "param"))
  (display (string-append value "\n" ) port))
    )
;;;;;;;;;;;;;;;; end mod RG ;;;;;;;;;;;;;;;;;;;;

[Gag (renaud-gaglione)]

This should be better. Sorry for my misunderstanding.

;;;;;;;;;;;;;;;; mod RG ;;;;;;;;;;;;;;;;;;;;
    (let ((param (gnetlist:get-package-attribute package "param")))
        (if (not (string=? param "unknown"))
  (display (string-append param "\n" ) port))
    )
(newline port)
;;;;;;;;;;;;;;;; end mod RG ;;;;;;;;;;;;;;;;;;;;