Commit 2364b7f3 authored by Michael Sherman's avatar Michael Sherman
Browse files

Fix bug in Fortran module generation.

parent 5fd032eb
...@@ -263,7 +263,7 @@ END MODULE OpenMM ...@@ -263,7 +263,7 @@ END MODULE OpenMM
type (<xsl:value-of select="$name"/>) target type (<xsl:value-of select="$name"/>) target
integer*4 size integer*4 size
end end
subroutine <xsl:value-of select="$name"/>_append(target, value subroutine <xsl:value-of select="$name"/>_append(target, value)
use OpenMM_Types; implicit none use OpenMM_Types; implicit none
type (<xsl:value-of select="$name"/>) target type (<xsl:value-of select="$name"/>) target
<xsl:value-of select="$element_type"/> value <xsl:value-of select="$element_type"/> value
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment