Skip to content
Snippets Groups Projects
Commit ff2848a4 authored by Thomas Jahns's avatar Thomas Jahns :cartwheel:
Browse files

Fix bug in struct declaration.

* The Fortran version must mirror the C version.
parent 9834a3a9
No related branches found
No related tags found
1 merge request!6Fix bug in struct declaration.
......@@ -77,7 +77,7 @@ getEventGroupRootEvent(struct _eventGroup* eg);
* @brief struct _event defines events. Events are set to be triggered at pre-specified intervals.
*
*/
/* Note: all updates here must be mirrored in src/mtime_c_bindings.f90! */
struct _event
{
struct _event* nextEventInGroup; ///< Pointer to the next event in a given Event Group.
......
......@@ -23,8 +23,11 @@ module mtime_c_bindings
type(c_ptr) :: eventFirstDatetime
type(c_ptr) :: eventLastDatetime
type(c_ptr) :: eventInterval
type(c_ptr) :: eventOffset
logical(c_bool) :: neverTriggerEvent
logical(c_bool) :: triggerCurrentEvent
logical(c_bool) :: nextEventIsFirst
logical(c_bool) :: lastEventWasFinal
logical(c_bool) :: eventisFirstInDay
logical(c_bool) :: eventisFirstInMonth
logical(c_bool) :: eventisFirstInYear
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment