1
1
openmpi/ompi/mpi/f90/xml/common.xsl
Jeff Squyres f8e634d6ca Bring over /tmp/f90-stuff branch to the trunk.
svn merge -r 9453:9609 https://svn.open-mpi.org/svn/ompi/tmp/f90-stuff .

Several improvements over the current F90 MPI bindings:

- The capability to make 4 sizes of the F90 bindings:
  - trivial: only the F90-specific MPI functions (sizeof and a few
    others)
  - small: (this is the default) all MPI functions that do not take
    choice buffers
  - medium: small + all MPI functions that take one choice buffer
    (e.g., MPI_SEND)
  - large: all MPI functions, but those that take 2 choice buffers
    (e.g., MPI_GATHER) only allow both buffers to be of the same type
- Remove all non-standard MPI types (LOGICAL*x, CHARACTER*x)
- Remove use of selected_*_kind() and only use MPI-defined types
  (INTEGER*x, etc.)
- Decrease complexity of the F90 configure and build system

This commit was SVN r9610.
2006-04-11 03:33:38 +00:00

107 строки
2.4 KiB
XML

<!--
...........................................................................
Copyright (c) 2004-2006 The Regents of the University of California.
All rights reserved.
$COPYRIGHT$
Additional copyrights may follow
$HEADER$
...........................................................................
-->
<!--
- common templates for Chasm language interoperability system
-
- variables:
- nl - a newline "\n"
-
- templates:
-
- include-files
- include-file (filename)
- include-file-local (filename)
-
- upper-case (symbol)
- lower-case (symbol)
-->
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
<xsl:output method="text"/>
<!--
- nl: a newline "\n"
-->
<xsl:variable name="nl">
<xsl:text>
</xsl:text>
</xsl:variable>
<!--
- include-files: include header files (to be overridden, this is a noop)
-->
<xsl:template name="include-files"/>
<!--
- include-file (filename): include named header file
-->
<xsl:template name="include-file">
<xsl:param name="filename"/>
<xsl:text>#include &lt;</xsl:text> <xsl:value-of select="$filename"/>
<xsl:text>&gt;</xsl:text> <xsl:value-of select="$nl"/>
</xsl:template>
<!--
- include-file-local (filename): include named header file
-->
<xsl:template name="include-file-local">
<xsl:param name="filename"/>
<xsl:text>#include &quot;</xsl:text> <xsl:value-of select="$filename"/>
<xsl:text>&quot;</xsl:text> <xsl:value-of select="$nl"/>
</xsl:template>
<!--
- upper-case (symbol): output symbol in upper case
-->
<xsl:template name="upper-case">
<xsl:param name="symbol"/>
<xsl:value-of select="translate($symbol,
'abcdefghijklmnopqrstuvwxyz',
'ABCDEFGHIJKLMNOPQRSTUVWXYZ')"/>
</xsl:template>
<!--
- lower-case (symbol): output symbol in lower case
-->
<xsl:template name="lower-case">
<xsl:param name="symbol"/>
<xsl:value-of select="translate($symbol,
'ABCDEFGHIJKLMNOPQRSTUVWXYZ',
'abcdefghijklmnopqrstuvwxyz')"/>
</xsl:template>
<!--
- name-ifnot-alias : choose alias or name if no alias
-->
<xsl:template name="name-ifnot-alias">
<xsl:choose>
<xsl:when test="@alias">
<xsl:value-of select="@alias"/>
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="@name"/>
</xsl:otherwise>
</xsl:choose>
</xsl:template>
</xsl:stylesheet>