GNU Octave  9.1.0
A high-level interpreted language, primarily intended for numerical computations, mostly compatible with Matlab
Macros | Typedefs | Functions
f77-fcn.h File Reference
#include "octave-config.h"
#include "lo-error.h"
#include "quit.h"
#include <stddef.h>

Go to the source code of this file.

Macros

#define F77_CMPLX_ARG(x)    reinterpret_cast<float _Complex *> (x)
 
#define F77_CONST_CMPLX_ARG(x)    reinterpret_cast<const float _Complex *> (x)
 
#define F77_CONST_DBLE_CMPLX_ARG(x)    reinterpret_cast<const double _Complex *> (x)
 
#define F77_CSTRING(s, len, cs)
 
#define F77_DBLE_CMPLX_ARG(x)    reinterpret_cast<double _Complex *> (x)
 
#define F77_FCN(f, F)   F77_FUNC (f, F)
 
#define F77_XFCN(f, F, args)    F77_FUNC (f, F) args
 

Typedefs

typedef float _Complex F77_CMPLX
 
typedef double F77_DBLE
 
typedef double _Complex F77_DBLE_CMPLX
 
typedef octave_f77_int_type F77_INT
 
typedef int32_t F77_INT4
 
typedef octave_f77_int_type F77_LOGICAL
 
typedef float F77_REAL
 

Functions

OCTAVE_NORETURN F77_RET_T F77_FUNC (xstopx, XSTOPX)(F77_CONST_CHAR_ARG_DECL F77_CHAR_ARG_LEN_DECL)
 

Macro Definition Documentation

◆ F77_CMPLX_ARG

#define F77_CMPLX_ARG (   x)     reinterpret_cast<float _Complex *> (x)

Definition at line 310 of file f77-fcn.h.

◆ F77_CONST_CMPLX_ARG

#define F77_CONST_CMPLX_ARG (   x)     reinterpret_cast<const float _Complex *> (x)

Definition at line 313 of file f77-fcn.h.

◆ F77_CONST_DBLE_CMPLX_ARG

#define F77_CONST_DBLE_CMPLX_ARG (   x)     reinterpret_cast<const double _Complex *> (x)

Definition at line 319 of file f77-fcn.h.

◆ F77_CSTRING

#define F77_CSTRING (   s,
  len,
  cs 
)
Value:
OCTAVE_LOCAL_BUFFER (char, cs, F77_CHAR_ARG_LEN_USE (s, len) + 1); \
memcpy (cs, F77_CHAR_ARG_USE (s), F77_CHAR_ARG_LEN_USE (s, len)); \
cs[F77_CHAR_ARG_LEN_USE(s, len)] = '\0'
OCTAVE_LOCAL_BUFFER
#define OCTAVE_LOCAL_BUFFER(T, buf, size)
Definition: oct-locbuf.h:44
len
F77_RET_T len
Definition: xerbla.cc:61

Definition at line 327 of file f77-fcn.h.

◆ F77_DBLE_CMPLX_ARG

#define F77_DBLE_CMPLX_ARG (   x)     reinterpret_cast<double _Complex *> (x)

Definition at line 316 of file f77-fcn.h.

◆ F77_FCN

#define F77_FCN (   f,
  F 
)    F77_FUNC (f, F)

Definition at line 49 of file f77-fcn.h.

◆ F77_XFCN

#define F77_XFCN (   f,
  F,
  args 
)     F77_FUNC (f, F) args

Definition at line 45 of file f77-fcn.h.

Typedef Documentation

◆ F77_CMPLX

typedef float _Complex F77_CMPLX

Definition at line 305 of file f77-fcn.h.

◆ F77_DBLE

typedef double F77_DBLE

Definition at line 302 of file f77-fcn.h.

◆ F77_DBLE_CMPLX

typedef double _Complex F77_DBLE_CMPLX

Definition at line 304 of file f77-fcn.h.

◆ F77_INT

typedef octave_f77_int_type F77_INT

Definition at line 306 of file f77-fcn.h.

◆ F77_INT4

typedef int32_t F77_INT4

Definition at line 307 of file f77-fcn.h.

◆ F77_LOGICAL

typedef octave_f77_int_type F77_LOGICAL

Definition at line 308 of file f77-fcn.h.

◆ F77_REAL

typedef float F77_REAL

Definition at line 303 of file f77-fcn.h.

Function Documentation

◆ F77_FUNC()

OCTAVE_NORETURN F77_RET_T F77_FUNC ( xstopx  ,
XSTOPX   
)

Definition at line 46 of file f77-fcn.c.

References len, and strlen().