Changeset 25813

Timestamp:

12/02/20 20:40:03 (4 years ago)

Author:

Mathieu Morlighem

Message:

BUG: fixing compilation issue, sorry

Location:

issm/trunk-jpl/src/c

Files:

• main/esmfbinders.cpp (modified) (1 diff)
• modules/VertexCoordinatesx/VertexCoordinatesx.cpp (modified) (3 diffs)

issm/trunk-jpl/src/c/main/esmfbinders.cpp

@@ -171 +171 @@
                 if(rc!=ESMF_SUCCESS) _error_("could not create EMSC_Mesh");
 
+                /*Add nodes (which are ISSM Vertices)*/
+
                 /*Some specific code here for the binding: */
                 _error_("not coded yet, will depend on what FISOC provides");

issm/trunk-jpl/src/c/modules/VertexCoordinatesx/VertexCoordinatesx.cpp

@@ -36 +36 @@
         IssmDouble* y=vy->ToMPISerial();
         IssmDouble* z=vz->ToMPISerial();
-        IssmDouble* rank = NULL;
-        if(prank) rank = vrank->ToMPISerial();
+        int* rank = NULL;
+        if(prank){
+                /*Need to convert from IssmDouble to int*/
+                IssmDouble* drank = vrank->ToMPISerial();
+                rank = xNew<int>(numberofvertices);
+                for(int i=0;i<numberofvertices;i++) rank[i] = reCast<int>(drank[i]);
+                xDelete<IssmDouble>(drank);
+                delete vrank;
+        }
 
         /*Free ressources: */
@@ -43 +50 @@
         delete vy;
         delete vz;
-        delete vrank;
 
         /*output: */
@@ -53 +59 @@
         else xDelete<IssmDouble>(z);
         if(prank) *prank=rank;
-        else xDelete<IssmDouble>(rank);
 }