Changeset 801 for XIOS/trunk/src/interface/c/icduration.cpp

Timestamp:

11/27/15 11:03:05 (8 years ago)

Author:

rlacroix

Message:

Fortran interface: Add functions to convert a string to a date or a duration.

File:

• XIOS/trunk/src/interface/c/icduration.cpp (modified) (1 diff)

XIOS/trunk/src/interface/c/icduration.cpp

@@ -13 +13 @@
     if (!string_copy(dur.toString(), str, str_size))
       ERROR("void cxios_duration_convert_to_string(cxios_duration dur_c, char* str, int str_size)", << "Input string is too short");
+  }
+
+  cxios_duration cxios_duration_convert_from_string(const char* str, int str_size)
+  {
+    std::string dur_str;
+    xios::CDuration dur;
+
+    if (cstr2string(str, str_size, dur_str))
+      dur = xios::CDuration::FromString(dur_str);
+
+    return { dur.year, dur.month, dur.day, dur.hour, dur.minute, dur.second, dur.timestep };
   }