luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Introduction of alias names for modules to prevent cryptic naming.

This commit is contained in:
dwarning 2006-02-21 08:05:18 +00:00
parent e95788e138
commit 2a2dc8d502
17 changed files with 195 additions and 70 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/spicelib/devices/adms/admst/ngspiceMODULE.c.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -38,7 +41,7 @@
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;ngspice.h&quot;
@ -114,7 +117,7 @@ int $(module)mSize = sizeof($(module)model);
</admst:template>
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%s.c">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -123,7 +126,7 @@ int $(module)mSize = sizeof($(module)model);
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%s.c: file created\n"/>
</admst:for-each>

27
src/spicelib/devices/adms/admst/ngspiceMODULEacld.c.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -51,7 +54,7 @@
</admst:template>
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;ngspice.h&quot;
@ -74,14 +77,26 @@ int $(module)acLoad(GENmodel *inModel, CKTcircuit *ckt)
<admst:value-of select="row/name"/>
<admst:value-of select="column/name"/>
<admst:value-of select="row/name"/>
<admst:text format=" *(here->PTR_J_%s_%s)+=here->JSVAL_%s_%s;\n"/>
<admst:value-of select="column/name"/>
<admst:value-of select="row/name"/>
<admst:value-of select="column/name"/>
<admst:value-of select="row/name"/>
<admst:value-of select="column/name"/>
<admst:value-of select="row/name"/>
<admst:text format=" if(here->PTR_J_%s_%s_required) {printf(&quot;JSVAL_%s_%s=%%e\\n&quot;,here->JSVAL_%s_%s); *(here->PTR_J_%s_%s)+=here->JSVAL_%s_%s;}\n"/>
</admst:for-each>
<admst:for-each select="jacobian[dynamic='yes']">
<admst:value-of select="column/name"/>
<admst:value-of select="row/name"/>
<admst:value-of select="column/name"/>
<admst:value-of select="row/name"/>
<admst:text format=" *(here->PTR_J_%s_%s+1)+=ckt->CKTomega*here->JDVAL_%s_%s;\n"/>
<admst:value-of select="column/name"/>
<admst:value-of select="row/name"/>
<admst:value-of select="column/name"/>
<admst:value-of select="row/name"/>
<admst:value-of select="column/name"/>
<admst:value-of select="row/name"/>
<admst:text format=" if(here->PTR_J_%s_%s_required) {printf(&quot;JDVAL_%s_%s=%%e\\n&quot;,ckt->CKTomega*here->JDVAL_%s_%s); *(here->PTR_J_%s_%s+1)+=ckt->CKTomega*here->JDVAL_%s_%s;}\n"/>
</admst:for-each>
} /* End of MOSFET Instance */
} /* End of Model Instance */
@ -91,7 +106,7 @@ int $(module)acLoad(GENmodel *inModel, CKTcircuit *ckt)
</admst:template>
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%sacld.c">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -100,7 +115,7 @@ int $(module)acLoad(GENmodel *inModel, CKTcircuit *ckt)
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%sacld.c: file created\n"/>
</admst:for-each>

11
src/spicelib/devices/adms/admst/ngspiceMODULEask.c.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -38,7 +41,7 @@
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;ngspice.h&quot;
@ -79,7 +82,7 @@ int $(module)ask(CKTcircuit *ckt, GENinstance *inst, int which, IFvalue *value,
</admst:template>
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%sask.c">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -88,7 +91,7 @@ int $(module)ask(CKTcircuit *ckt, GENinstance *inst, int which, IFvalue *value,
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%sask.c: file created\n"/>
</admst:for-each>

15
src/spicelib/devices/adms/admst/ngspiceMODULEdefs.h.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.3 2006-02-09 11:25:24 pnenzi
Revision 1.4 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.3 2006/02/09 11:25:24 pnenzi
Latest update from Laurent and Dietmar: (empty instances)
@ -47,8 +50,9 @@
</admst:template>
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#ifndef $(module)
#define $(module)
@ -282,6 +286,9 @@ typedef struct s$(module)model { /* model structure */
<admst:text format=" DUMMY_INSTANCE"/>
<admst:text format="\n} e_$(module)_instance;\n"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;$(module)ext.h&quot;
#endif /*$(module)*/
@ -289,7 +296,7 @@ typedef struct s$(module)model { /* model structure */
</admst:template>
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%sdefs.h">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -298,7 +305,7 @@ typedef struct s$(module)model { /* model structure */
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%sdefs.h: file created\n"/>
</admst:for-each>

15
src/spicelib/devices/adms/admst/ngspiceMODULEext.h.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -36,11 +39,15 @@
<!DOCTYPE admst SYSTEM "admst.dtd">
<admst version="2.1.3" xmlns:admst="http://mot-adms.sourceforge.net/xml-files/admst">
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#ifndef __$(module)EXT_H
#define __$(module)EXT_H
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;$(module)defs.h&quot;
extern int $(module)par(int,IFvalue*,GENinstance*,IFvalue*);
@ -67,7 +74,7 @@ extern void $(module)destroy(GENmodel**);
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%sext.h">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -76,7 +83,7 @@ extern void $(module)destroy(GENmodel**);
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%sext.h: file created\n"/>
</admst:for-each>

11
src/spicelib/devices/adms/admst/ngspiceMODULEguesstopology.c.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -259,7 +262,7 @@
</admst:template>
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;ngspice.h&quot;
@ -300,7 +303,7 @@ int $(module)guesstopology (SMPmatrix *matrix, CKTcircuit *ckt, $(module)model *
</admst:template>
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%sguesstopology.c">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -309,7 +312,7 @@ int $(module)guesstopology (SMPmatrix *matrix, CKTcircuit *ckt, $(module)model *
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%sguesstopology.c: file created\n"/>
</admst:for-each>

14
src/spicelib/devices/adms/admst/ngspiceMODULEinit.c.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -36,12 +39,13 @@
<!DOCTYPE admst SYSTEM "admst.dtd">
<admst version="2.1.3" xmlns:admst="http://mot-adms.sourceforge.net/xml-files/admst">
<admst:template match="code">
<admst:value-of select="name"/>
<admst:variable name="module" select="%s"/>
#include "config.h"
#include "devdefs.h"
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;$(module)itf.h&quot;
#include &quot;$(module)ext.h&quot;
#include &quot;$(module)init.h&quot;
@ -119,7 +123,7 @@ get_$(module)_info(void)
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%sinit.c">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -128,7 +132,7 @@ get_$(module)_info(void)
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%sinit.c: file created\n"/>
</admst:for-each>

12
src/spicelib/devices/adms/admst/ngspiceMODULEinit.h.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -36,8 +39,9 @@
<!DOCTYPE admst SYSTEM "admst.dtd">
<admst version="2.1.3" xmlns:admst="http://mot-adms.sourceforge.net/xml-files/admst">
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#ifndef _$(module)INIT_H
#define _$(module)INIT_H
@ -55,7 +59,7 @@ extern int $(module)mSize;
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%sinit.h">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -64,7 +68,7 @@ extern int $(module)mSize;
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%sinit.h: file created\n"/>
</admst:for-each>

12
src/spicelib/devices/adms/admst/ngspiceMODULEitf.h.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -36,8 +39,9 @@
<!DOCTYPE admst SYSTEM "admst.dtd">
<admst version="2.1.3" xmlns:admst="http://mot-adms.sourceforge.net/xml-files/admst">
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#ifndef DEV_$(module)
#define DEV_$(module)
@ -48,7 +52,7 @@ extern SPICEdev *get_$(module)_info(void);
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%sitf.h">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -57,7 +61,7 @@ extern SPICEdev *get_$(module)_info(void);
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%sitf.h: file created\n"/>
</admst:for-each>

18
src/spicelib/devices/adms/admst/ngspiceMODULEload.c.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -51,11 +54,11 @@
</admst:template>
<admst:template match="code">
<admst:value-of select="name"/>
<admst:variable name="module" select="%s"/>
#define NGSPICE_DEBUG_OK
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;ngspice.h&quot;
#include &quot;cktdefs.h&quot;
#include &quot;$(module)defs.h&quot;
@ -234,8 +237,9 @@ int $(module)load(inModel,ckt)
<!-- analog/![initial_model|initial_instance|initial_step|noise] -->
<admst:template match="debug:strobe">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
<admst:text format="void $(module)debug (CKTcircuit *ckt, $(module)model *model, $(module)instance *here)\n"/>
<admst:text format="{\n"/>
<admst:for-each select="node[grounded='no']">
@ -329,7 +333,7 @@ int $(module)load(inModel,ckt)
</admst:template>
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%sload.c">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -338,7 +342,7 @@ int $(module)load(inModel,ckt)
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%sload.c: file created\n"/>
</admst:for-each>

11
src/spicelib/devices/adms/admst/ngspiceMODULEmask.c.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -38,7 +41,7 @@
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;ngspice.h&quot;
@ -80,7 +83,7 @@ int $(module)mAsk(CKTcircuit *ckt, GENmodel *inst, int which, IFvalue *value)
</admst:template>
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%smask.c">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -89,7 +92,7 @@ int $(module)mAsk(CKTcircuit *ckt, GENmodel *inst, int which, IFvalue *value)
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%smask.c: file created\n"/>
</admst:for-each>

11
src/spicelib/devices/adms/admst/ngspiceMODULEmpar.c.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -38,7 +41,7 @@
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;ngspice.h&quot;
@ -81,7 +84,7 @@ int $(module)mParam(int param, IFvalue *value, GENmodel *inMod)
</admst:template>
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%smpar.c">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -90,7 +93,7 @@ int $(module)mParam(int param, IFvalue *value, GENmodel *inMod)
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%smpar.c: file created\n"/>
</admst:for-each>

11
src/spicelib/devices/adms/admst/ngspiceMODULEpar.c.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -37,7 +40,7 @@
<admst version="2.1.3" xmlns:admst="http://mot-adms.sourceforge.net/xml-files/admst">
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;ngspice.h&quot;
@ -79,7 +82,7 @@ int $(module)par(int param, IFvalue *value, GENinstance *inst, IFvalue *select)
</admst:template>
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%spar.c">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -88,7 +91,7 @@ int $(module)par(int param, IFvalue *value, GENinstance *inst, IFvalue *select)
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%spar.c: file created\n"/>
</admst:for-each>

11
src/spicelib/devices/adms/admst/ngspiceMODULEsetup.c.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -51,7 +54,7 @@
</admst:template>
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;ngspice.h&quot;
@ -162,7 +165,7 @@ int $(module)setup (SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *
</admst:template>
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%ssetup.c">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -171,7 +174,7 @@ int $(module)setup (SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%ssetup.c: file created\n"/>
</admst:for-each>

11
src/spicelib/devices/adms/admst/ngspiceMODULEtemp.c.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.2 2006-02-02 17:56:31 pnenzi
Revision 1.3 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.2 2006/02/02 17:56:31 pnenzi
Changed adms required version to 2.1.3 ,J
@ -51,7 +54,7 @@
</admst:template>
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
#include &quot;ngspice.h&quot;
@ -85,7 +88,7 @@ int $(module)temp(GENmodel *inModel, CKTcircuit *ckt)
</admst:template>
<admst:for-each select="/module">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:open file="%stemp.c">
<admst:value-of select="/simulator/package_string"/>
<admst:text format="/***\n*** Interface: %s\n"/>
@ -94,7 +97,7 @@ int $(module)temp(GENmodel *inModel, CKTcircuit *ckt)
<admst:text format=" *** created by: %s - %s ***/\n"/>
<admst:apply-templates select="." match="code"/>
</admst:open>
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:message format="%stemp.c: file created\n"/>
</admst:for-each>

26
src/spicelib/devices/adms/admst/ngspiceMakefile.am.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.5 2006-02-20 09:07:14 dwarning
Revision 1.6 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.5 2006/02/20 09:07:14 dwarning
For make adms we don't need make an new Makefile. Is done by autogen.sh.
Revision 1.4 2006/02/16 09:17:40 dwarning
@ -49,12 +52,12 @@
<admst:template match="code">
<admst:value-of select="name"/>
<admst:value-of select="attribute[name='ngspicename']/value"/>
<admst:variable name="module" select="%s"/>
## Process this file with automake to produce Makefile.in
ADMSXMLINTERFACE:=../admst
adms:
$(module).c:
admsXml -Iadmsva admsva/$(module).va \\
-e \$(ADMSXMLINTERFACE)/ngspiceVersion.xml \\
-e \$(ADMSXMLINTERFACE)/ngspiceMODULEitf.h.xml \\
@ -93,6 +96,23 @@ lib$(module)_a_SOURCES = \\
$(module)setup.c \\
$(module)temp.c
BUILT_SOURCES = \\
$(module).c \\
$(module)acld.c \\
$(module)ask.c \\
$(module)defs.h \\
$(module)ext.h \\
$(module)guesstopology.c \\
$(module)init.c \\
$(module)init.h \\
$(module)itf.h \\
$(module)load.c \\
$(module)mask.c \\
$(module)mpar.c \\
$(module)par.c \\
$(module)setup.c \\
$(module)temp.c
#TODO (not implemented) \\
$(module)conv.c \\
$(module)del.c \\

38
src/spicelib/devices/adms/admst/ngspiceVersion.xml
View File

@ -5,7 +5,10 @@
-->
<!--
$Log$
Revision 1.7 2006-02-10 06:59:56 pnenzi
Revision 1.8 2006-02-21 08:05:18 dwarning
Introduction of alias names for modules to prevent cryptic naming.
Revision 1.7 2006/02/10 06:59:56 pnenzi
Added section for r and c elements (Laurent)
@ -1710,6 +1713,39 @@
<admst:value-to select="/simulator/package_bugreport" value="r29173@users.sourceforge.net"/>
<admst:for-each select="/module">
<admst:choose>
<admst:when test="[name='hic0_full']">
<admst:new datatype="attribute" arguments="ngspicename">
<admst:push into="../attribute" select="." onduplicate="abort"/>
<admst:value-to select="value" value="hicum0"/>
</admst:new>
</admst:when>
<admst:when test="[name='hic2_full']">
<admst:new datatype="attribute" arguments="ngspicename">
<admst:push into="../attribute" select="." onduplicate="abort"/>
<admst:value-to select="value" value="hicum2"/>
</admst:new>
</admst:when>
<admst:when test="[name='bjt504_va']">
<admst:new datatype="attribute" arguments="ngspicename">
<admst:push into="../attribute" select="." onduplicate="abort"/>
<admst:value-to select="value" value="mextram"/>
</admst:new>
</admst:when>
<admst:when test="[name='pspva']">
<admst:new datatype="attribute" arguments="ngspicename">
<admst:push into="../attribute" select="." onduplicate="abort"/>
<admst:value-to select="value" value="psp"/>
</admst:new>
</admst:when>
<admst:otherwise>
<admst:new datatype="attribute" arguments="ngspicename">
<admst:push into="../attribute" select="." onduplicate="abort"/>
<admst:value-of select="../name"/>
<admst:value-to select="value" value="%s"/>
</admst:new>
</admst:otherwise>
</admst:choose>
<admst:choose>
<admst:when test="[name='r2_et_cmc' or name='r2_cmc']">
</admst:when>