Skip to content

Commit

Permalink
Make argument names consistent in docs and header
Browse files Browse the repository at this point in the history
  • Loading branch information
Steven-Roberts committed Oct 28, 2024
1 parent ae18e60 commit 4893e19
Show file tree
Hide file tree
Showing 4 changed files with 9 additions and 9 deletions.
2 changes: 1 addition & 1 deletion doc/shared/sunstepper/SUNStepper_Description.rst
Original file line number Diff line number Diff line change
Expand Up @@ -306,7 +306,7 @@ This section describes the virtual methods defined by the :c:type:`SUNStepper`
abstract base class.
.. c:type:: SUNErrCode (*SUNStepperEvolveFn)(SUNStepper stepper, sunrealtype tout, N_Vector v, sunrealtype* tret, int* stop_reason)
.. c:type:: SUNErrCode (*SUNStepperEvolveFn)(SUNStepper stepper, sunrealtype tout, N_Vector vret, sunrealtype* tret)
This type represents a function with the signature of
:c:func:`SUNStepper_Evolve`.
Expand Down
4 changes: 2 additions & 2 deletions include/sundials/sundials_stepper.h
Original file line number Diff line number Diff line change
Expand Up @@ -29,7 +29,7 @@ typedef int (*SUNJacTimesFn)(N_Vector v, N_Vector Jv, sunrealtype t, N_Vector y,
typedef _SUNDIALS_STRUCT_ SUNStepper_* SUNStepper;

typedef SUNErrCode (*SUNStepperEvolveFn)(SUNStepper stepper, sunrealtype tout,
N_Vector vout, sunrealtype* tret);
N_Vector vret, sunrealtype* tret);

typedef SUNErrCode (*SUNStepperFullRhsFn)(SUNStepper stepper, sunrealtype t,
N_Vector v, N_Vector f);
Expand All @@ -55,7 +55,7 @@ SUNErrCode SUNStepper_Destroy(SUNStepper* stepper);

SUNDIALS_EXPORT
SUNErrCode SUNStepper_Evolve(SUNStepper stepper, sunrealtype tout,
N_Vector vout, sunrealtype* tret);
N_Vector vret, sunrealtype* tret);

SUNDIALS_EXPORT
SUNErrCode SUNStepper_FullRhs(SUNStepper stepper, sunrealtype t, N_Vector v,
Expand Down
6 changes: 3 additions & 3 deletions src/sundials/fmod_int32/fsundials_core_mod.f90
Original file line number Diff line number Diff line change
Expand Up @@ -4988,13 +4988,13 @@ function FSUNStepper_Destroy(stepper) &
swig_result = fresult
end function

function FSUNStepper_Evolve(stepper, tout, vout, tret) &
function FSUNStepper_Evolve(stepper, tout, vret, tret) &
result(swig_result)
use, intrinsic :: ISO_C_BINDING
integer(C_INT) :: swig_result
type(C_PTR) :: stepper
real(C_DOUBLE), intent(in) :: tout
type(N_Vector), target, intent(inout) :: vout
type(N_Vector), target, intent(inout) :: vret
real(C_DOUBLE), dimension(*), target, intent(inout) :: tret
integer(C_INT) :: fresult
type(C_PTR) :: farg1
Expand All @@ -5004,7 +5004,7 @@ function FSUNStepper_Evolve(stepper, tout, vout, tret) &

farg1 = stepper
farg2 = tout
farg3 = c_loc(vout)
farg3 = c_loc(vret)
farg4 = c_loc(tret(1))
fresult = swigc_FSUNStepper_Evolve(farg1, farg2, farg3, farg4)
swig_result = fresult
Expand Down
6 changes: 3 additions & 3 deletions src/sundials/fmod_int64/fsundials_core_mod.f90
Original file line number Diff line number Diff line change
Expand Up @@ -4988,13 +4988,13 @@ function FSUNStepper_Destroy(stepper) &
swig_result = fresult
end function

function FSUNStepper_Evolve(stepper, tout, vout, tret) &
function FSUNStepper_Evolve(stepper, tout, vret, tret) &
result(swig_result)
use, intrinsic :: ISO_C_BINDING
integer(C_INT) :: swig_result
type(C_PTR) :: stepper
real(C_DOUBLE), intent(in) :: tout
type(N_Vector), target, intent(inout) :: vout
type(N_Vector), target, intent(inout) :: vret
real(C_DOUBLE), dimension(*), target, intent(inout) :: tret
integer(C_INT) :: fresult
type(C_PTR) :: farg1
Expand All @@ -5004,7 +5004,7 @@ function FSUNStepper_Evolve(stepper, tout, vout, tret) &

farg1 = stepper
farg2 = tout
farg3 = c_loc(vout)
farg3 = c_loc(vret)
farg4 = c_loc(tret(1))
fresult = swigc_FSUNStepper_Evolve(farg1, farg2, farg3, farg4)
swig_result = fresult
Expand Down

0 comments on commit 4893e19

Please sign in to comment.