From 8bfc98d008f384d452de0a0ec9e7c7a6a6d1b8c2 Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Tue, 26 Jul 2011 19:51:29 +0000
Subject: [PATCH] lower-case the first string in an IOP("HuGo",...) incantation

---
 ChangeLog                                   | 9 +++++++++
 src/spicelib/devices/adms/admst/ngspice.xml | 8 ++++----
 2 files changed, 13 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 0cda34f8b..9c64c69c8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,12 @@
+2011-07-26  Robert Larice
+ * src/spicelib/devices/adms/admst/ngspice.xml :
+   lower-case the first string in an IOP("HuGo",...) incantation
+
+2011-07-26  Laurent Lemaitre
+ * src/spicelib/devices/adms/admst/ngspice.xml :
+   remove perl command in generated Makefime.am
+     which lower-case'ed the first string in an IOP("HuGo",...) incantation
+
 2011-07-26  Robert Larice
  * src/include/ngspice.h ,
  * src/spicelib/devices/adms/admst/ngspice.xml :
diff --git a/src/spicelib/devices/adms/admst/ngspice.xml b/src/spicelib/devices/adms/admst/ngspice.xml
index fcf09dd39..6c1ca7af1 100644
--- a/src/spicelib/devices/adms/admst/ngspice.xml
+++ b/src/spicelib/devices/adms/admst/ngspice.xml
@@ -5277,10 +5277,10 @@ int $(module)guesstopology (SMPmatrix *matrix, CKTcircuit *ckt, $(module)model *
 <admst:join select="modulevariablep[#parametertype='instance' and isparameter='yes']" separator=",\n">
 <admst:choose>
 <admst:when test="[type='real']">
-<admst:text format=" IOP(&quot;%(name)&quot;,$(module)_instance_%(name),IF_REAL,&quot;%(name)&quot;)"/>
+<admst:text format=" IOP(&quot;%(lower-case(name))&quot;,$(module)_instance_%(name),IF_REAL,&quot;%(name)&quot;)"/>
 </admst:when>
 <admst:when test="[type='integer']">
-<admst:text format=" IOP(&quot;%(name)&quot;,$(module)_instance_%(name),IF_INTEGER,&quot;%(name)&quot;)"/>
+<admst:text format=" IOP(&quot;%(lower-case(name))&quot;,$(module)_instance_%(name),IF_INTEGER,&quot;%(name)&quot;)"/>
 </admst:when>
 <admst:otherwise>
 <admst:fatal format="parameter of type 'string' not supported\n"/>
@@ -5292,10 +5292,10 @@ int $(module)guesstopology (SMPmatrix *matrix, CKTcircuit *ckt, $(module)model *
 <admst:join select="modulevariablep[#parametertype!='instance' and isparameter='yes']" separator=",\n">
 <admst:choose>
 <admst:when test="[type='real']">
-<admst:text format=" IOP(&quot;%(name)&quot;,$(module)_model_%(name),IF_REAL,&quot;%(name)&quot;)"/>
+<admst:text format=" IOP(&quot;%(lower-case(name))&quot;,$(module)_model_%(name),IF_REAL,&quot;%(name)&quot;)"/>
 </admst:when>
 <admst:when test="[type='integer']">
-<admst:text format=" IOP(&quot;%(name)&quot;,$(module)_model_%(name),IF_INTEGER,&quot;%(name)&quot;)"/>
+<admst:text format=" IOP(&quot;%(lower-case(name))&quot;,$(module)_model_%(name),IF_INTEGER,&quot;%(name)&quot;)"/>
 </admst:when>
 <admst:otherwise>
 <admst:fatal format="parameter of type 'string' not supported\n"/>