minor changes to ensure OutputTestXdmfFortran works properly

861177e9 · Andrew J. Burns (Cont · 1c4b3e25 · 861177e9 · 861177e9
Commit 861177e9 authored Apr 22, 2013 by Andrew J. Burns (Cont
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

utils/Xdmf.f utils/Xdmf.f +1 -1

utils/tests/Fortran/OutputTestXdmfFortran.f90 utils/tests/Fortran/OutputTestXdmfFortran.f90 +1 -1

No files found.
--- a/utils/Xdmf.f
+++ b/utils/Xdmf.f
@@ -9,7 +9,7 @@ integer xdmfstoremap
 integer xdmfaddcoordinate
 integer xdmfaddset

-
+integer xdmfsettopologypolyline




--- a/utils/tests/Fortran/OutputTestXdmfFortran.f90
+++ b/utils/tests/Fortran/OutputTestXdmfFortran.f90
@@ -122,7 +122,7 @@ PROGRAM XdmfFortranExample
  CALL XDMFSETTIME(obj, myTime)
 !! Unstructured Only
  tempID = XDMFSETTOPOLOGY(obj, XDMF_TOPOLOGY_TYPE_HEXAHEDRON, 16, &
-       XDMF_ARRAY_TYPE_INT32, myConnections, 0)
+       XDMF_ARRAY_TYPE_INT32, myConnections)
 !! /Unstructured Only
 !! Curvilinear and Rectilinear Only
  tempID = XDMFSETDIMENSIONS(obj, 3, XDMF_ARRAY_TYPE_INT32, myDimensions)