fitpack
Modern Fortran library for curve and surface fitting with splines
Loading...
Searching...
No Matches
fitpack_fx_status Module Reference

Self-contained fx_status shim for standalone bindings (no fortran-arrays dependency) More...

Data Types

interface  fx_status
 C-interoperable status type for error reporting across language boundaries. More...
 

Functions/Subroutines

pure type(fx_status) function fx_status_new (code, message)
 Build an error status from a code and a Fortran string.
 
pure character(len=len_status_msg) function fx_status_message (status)
 Read a status message back as a Fortran string.
 
subroutine, public handle_error (stat0, stat)
 Copy the local status to the caller's optional out-argument, or stop on error.
 

Variables

integer, parameter len_status_msg = 248
 
integer(c_int), parameter, public fx_ok = 0
 Status codes. Values mirror arrays_c; only the codes the generated wrappers actually raise are carried here.
 
integer(c_int), parameter, public fx_error_allocation = 1
 
integer(c_int), parameter, public fx_error_deallocation = 2
 
type(fx_status), parameter, public fx_status_ok = fx_status( ok = .true._c_bool, code = FX_OK, message = c_null_char)
 Success status constant (initialization without a procedure call)
 

Detailed Description

Self-contained fx_status shim for standalone bindings (no fortran-arrays dependency)

Function/Subroutine Documentation

◆ fx_status_message()

pure character(len=len_status_msg) function fitpack_fx_status::fx_status_message ( type(fx_status), intent(in) status)
private

Read a status message back as a Fortran string.

◆ fx_status_new()

pure type(fx_status) function fitpack_fx_status::fx_status_new ( integer(c_int), intent(in) code,
character(*), intent(in) message )
private

Build an error status from a code and a Fortran string.

◆ handle_error()

subroutine, public fitpack_fx_status::handle_error ( type(fx_status), intent(in) stat0,
type(fx_status), intent(out), optional stat )

Copy the local status to the caller's optional out-argument, or stop on error.

Parameters
stat0- Local status carrying the error information
stat- Optional output status for the caller
Here is the call graph for this function:

Variable Documentation

◆ fx_error_allocation

integer(c_int), parameter, public fitpack_fx_status::fx_error_allocation = 1

◆ fx_error_deallocation

integer(c_int), parameter, public fitpack_fx_status::fx_error_deallocation = 2

◆ fx_ok

integer(c_int), parameter, public fitpack_fx_status::fx_ok = 0

Status codes. Values mirror arrays_c; only the codes the generated wrappers actually raise are carried here.

◆ fx_status_ok

type(fx_status), parameter, public fitpack_fx_status::fx_status_ok = fx_status( ok = .true._c_bool, code = FX_OK, message = c_null_char)

Success status constant (initialization without a procedure call)

◆ len_status_msg

integer, parameter fitpack_fx_status::len_status_msg = 248
private