diff --git a/src/arkode/fmod_int32/farkode_mod.f90 b/src/arkode/fmod_int32/farkode_mod.f90 index 90510d8388..5d13b9078f 100644 --- a/src/arkode/fmod_int32/farkode_mod.f90 +++ b/src/arkode/fmod_int32/farkode_mod.f90 @@ -95,7 +95,8 @@ module farkode_mod integer(C_INT), parameter, public :: ARK_CONTROLLER_ERR = -47_C_INT integer(C_INT), parameter, public :: ARK_STEPPER_UNSUPPORTED = -48_C_INT integer(C_INT), parameter, public :: ARK_SUNSTEPPER_ERR = -49_C_INT - integer(C_INT), parameter, public :: ARK_ADJ_RECOMPUTE_FAIL = -50_C_INT + integer(C_INT), parameter, public :: ARK_ADJ_CHECKPOINT_FAIL = -50_C_INT + integer(C_INT), parameter, public :: ARK_ADJ_RECOMPUTE_FAIL = -51_C_INT integer(C_INT), parameter, public :: ARK_UNRECOGNIZED_ERROR = -99_C_INT ! typedef enum ARKRelaxSolver enum, bind(c) diff --git a/src/arkode/fmod_int64/farkode_mod.f90 b/src/arkode/fmod_int64/farkode_mod.f90 index 5195e19e9b..0d21f0398b 100644 --- a/src/arkode/fmod_int64/farkode_mod.f90 +++ b/src/arkode/fmod_int64/farkode_mod.f90 @@ -95,7 +95,8 @@ module farkode_mod integer(C_INT), parameter, public :: ARK_CONTROLLER_ERR = -47_C_INT integer(C_INT), parameter, public :: ARK_STEPPER_UNSUPPORTED = -48_C_INT integer(C_INT), parameter, public :: ARK_SUNSTEPPER_ERR = -49_C_INT - integer(C_INT), parameter, public :: ARK_ADJ_RECOMPUTE_FAIL = -50_C_INT + integer(C_INT), parameter, public :: ARK_ADJ_CHECKPOINT_FAIL = -50_C_INT + integer(C_INT), parameter, public :: ARK_ADJ_RECOMPUTE_FAIL = -51_C_INT integer(C_INT), parameter, public :: ARK_UNRECOGNIZED_ERROR = -99_C_INT ! typedef enum ARKRelaxSolver enum, bind(c)