Fix Fortran issues: comment API scpecification to allow to pass null …

…pointer to the function + remove the PUBLIC directory to the include dirs.
MmgTools · Jun 20, 2022 · 5b7cf4e · 5b7cf4e
1 parent 84b774c
commit 5b7cf4e
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 7 deletions.
diff --git a/cmake/modules/mmg3d.cmake b/cmake/modules/mmg3d.cmake
@@ -100,7 +100,7 @@ FILE(
 
 IF( ELAS_FOUND AND NOT USE_ELAS MATCHES OFF )
   # Set flags for building test program
-  INCLUDE_DIRECTORIES(AFTER PUBLIC ${ELAS_INCLUDE_DIR})
+  INCLUDE_DIRECTORIES(AFTER ${ELAS_INCLUDE_DIR})
 
   SET(CMAKE_REQUIRED_INCLUDES ${ELAS_INCLUDE_DIR})
   SET(CMAKE_REQUIRED_LIBRARIES ${ELAS_LIBRARY})

diff --git a/src/mmg2d/libmmg2d.h b/src/mmg2d/libmmg2d.h
@@ -1131,13 +1131,16 @@ extern "C" {
  *
  * Get vertices and references of the mesh edges.
  *
+ * \remark Fortran interface: (commentated in order to allow to pass \%val(0)
+ * instead of the refs, areRidges or areRequired arrays)
+ *
  * \remark Fortran interface:
- * >   SUBROUTINE MMG2D_GET_EDGES(mesh,edges,refs,areRidges,areRequired,retval)\n
- * >     MMG5_DATA_PTR_T,INTENT(INOUT) :: mesh\n
- * >     INTEGER, INTENT(IN)           :: edges(*)\n
- * >     INTEGER, INTENT(OUT)          :: refs(*),areRequired(*),areRidges(*)\n
- * >     INTEGER, INTENT(OUT)          :: retval\n
- * >   END SUBROUTINE\n
+ * > !  SUBROUTINE MMG2D_GET_EDGES(mesh,edges,refs,areRidges,areRequired,retval)\n
+ * > !    MMG5_DATA_PTR_T,INTENT(INOUT) :: mesh\n
+ * > !    INTEGER, DIMENSION(*),INTENT(OUT) :: edges\n
+ * > !    INTEGER, DIMENSION(*)         :: refs,areRequired,areRidges\n
+ * > !    INTEGER, INTENT(OUT)          :: retval\n
+ * > !  END SUBROUTINE\n
  *
  */
   LIBMMG2D_EXPORT int MMG2D_Get_edges(MMG5_pMesh mesh,int *edges,int* refs,