From 6de975591925721b51158b7d1ec2eaa5b12934c8 Mon Sep 17 00:00:00 2001
From: Craig E Rasmussen <rasmus@cas.uoregon.edu>
Date: Thu, 20 Apr 2006 21:30:28 +0000
Subject: [PATCH] Added counter to output macro name

This commit was SVN r9675.
---
 ompi/mpi/f90/xml/chasm-mpi.i.f90.xsl | 22 ++++++++++++++--------
 1 file changed, 14 insertions(+), 8 deletions(-)

diff --git a/ompi/mpi/f90/xml/chasm-mpi.i.f90.xsl b/ompi/mpi/f90/xml/chasm-mpi.i.f90.xsl
index b227789b0d..5c83772ca7 100644
--- a/ompi/mpi/f90/xml/chasm-mpi.i.f90.xsl
+++ b/ompi/mpi/f90/xml/chasm-mpi.i.f90.xsl
@@ -99,7 +99,7 @@
 <xsl:text>
 #------------------------------------------------------------------------
 
-output</xsl:text>  <xsl:text>() {
+output_</xsl:text>  <xsl:number/>  <xsl:text>() {
     if test "$output" = "0"; then
         return 0
     fi
@@ -144,7 +144,8 @@ start </xsl:text>
     <xsl:text> </xsl:text>
     <xsl:call-template name="interface-size"/>
 <xsl:text>
-output </xsl:text>  <xsl:value-of select="@name"/>  <xsl:text>
+output_</xsl:text>  <xsl:number/>  <xsl:text> </xsl:text>
+<xsl:value-of select="@name"/>  <xsl:text>
 end </xsl:text>
     <xsl:choose>
       <xsl:when test="@interface != ''">
@@ -167,7 +168,7 @@ end </xsl:text>
 <xsl:text>
 #------------------------------------------------------------------------
 
-output</xsl:text>  <xsl:text>() {
+output_</xsl:text>  <xsl:number/>  <xsl:text>() {
     if test "$output" = "0"; then
         return 0
     fi
@@ -220,23 +221,28 @@ do
   case "$rank" in  6)  dim=', dimension(:,:,:,:,:,:)'  ;  esac
   case "$rank" in  7)  dim=', dimension(:,:,:,:,:,:,:)'  ;  esac
 
-  output </xsl:text>  <xsl:value-of select="@name"/>
+  output_</xsl:text>  <xsl:number/>  <xsl:text> </xsl:text>
+  <xsl:value-of select="@name"/>
   <xsl:text> ${rank} CH "character${dim}"
-  output </xsl:text>  <xsl:value-of select="@name"/>
+  output_</xsl:text>  <xsl:number/>  <xsl:text> </xsl:text>
+  <xsl:value-of select="@name"/>
   <xsl:text> ${rank} L "logical${dim}"
   for kind in $ikinds
   do
-    output </xsl:text>  <xsl:value-of select="@name"/>
+    output_</xsl:text>  <xsl:number/>  <xsl:text> </xsl:text>
+    <xsl:value-of select="@name"/>
   <xsl:text> ${rank} I${kind} "integer*${kind}${dim}"
   done
   for kind in $rkinds
   do
-    output </xsl:text>  <xsl:value-of select="@name"/>
+    output_</xsl:text>  <xsl:number/>  <xsl:text> </xsl:text>
+    <xsl:value-of select="@name"/>
     <xsl:text> ${rank} R${kind} "real*${kind}${dim}"
   done
   for kind in $ckinds
   do
-    output </xsl:text>  <xsl:value-of select="@name"/>
+    output_</xsl:text>  <xsl:number/>  <xsl:text> </xsl:text>
+    <xsl:value-of select="@name"/>
     <xsl:text> ${rank} C${kind} "complex*${kind}${dim}"
   done
 done