Go to the source code of this file.
Defines | |
#define | _cfleft 1 |
#define | _cfright |
#define | _cfleft_cfright 0 |
#define | ANSI_C_preprocessor _cfleft/**/_cfright |
#define | _0(A, B) A##B |
#define | _(A, B) _0(A,B) |
#define | _2(A, B) A##B |
#define | _3(A, B, C) _(A,_(B,C)) |
#define | CF_SAME_NAMESPACE |
#define | CFC_(UN, LN) LN |
#define | orig_fcallsc(UN, LN) CFC_(UN,LN) |
#define | fcallsc(UN, LN) orig_fcallsc(UN,LN) |
#define | preface_fcallsc(P, p, UN, LN) CFC_(_(P,UN),_(p,LN)) |
#define | append_fcallsc(P, p, UN, LN) CFC_(_(UN,P),_(LN,p)) |
#define | C_FUNCTION(UN, LN) fcallsc(UN,LN) |
#define | FORTRAN_FUNCTION(UN, LN) CFC_(UN,LN) |
#define | COMMON_BLOCK(UN, LN) CFC_(UN,LN) |
#define | DOUBLE_PRECISION double |
#define | FORTRAN_REAL float |
#define | FLOATVVVVVVV_cfPP |
#define | VOIDP |
#define | COMMON_BLOCK_DEF(DEFINITION, NAME) extern DEFINITION NAME |
#define | CF_NULL_PROTO |
#define | CF_DECLARE_GETARG |
#define | CF_SET_GETARG(ARGC, ARGV) |
#define | ACOMMA , |
#define | ACOLON ; |
#define | _cfMIN(A, B) (A<B?A:B) |
#define | FALSE (1==0) |
#define | firstindexlength(A) (sizeof(A[0])==1 ? 1 : (sizeof(A) / sizeof(A[0])) ) |
#define | secondindexlength(A) (sizeof(A[0])==1 ? sizeof(A) : sizeof(A[0]) ) |
#define | C2FLOGICALV(A, I) do {int __i; for(__i=0;__i<I;__i++) A[__i]=C2FLOGICAL(A[__i]); } while (FALSE) |
#define | F2CLOGICALV(A, I) do {int __i; for(__i=0;__i<I;__i++) A[__i]=F2CLOGICAL(A[__i]); } while (FALSE) |
#define | C2FLOGICAL(L) (L) |
#define | F2CLOGICAL(L) (L) |
#define | C2FLOGICALV(A, I) |
#define | F2CLOGICALV(A, I) |
#define | _NUM_ELEMS -1 |
#define | _NUM_ELEM_ARG -2 |
#define | NUM_ELEMS(A) A,_NUM_ELEMS |
#define | NUM_ELEM_ARG(B) *_2(A,B),_NUM_ELEM_ARG |
#define | TERM_CHARS(A, B) A,B |
#define | C2FCBSTR(CSTR, FSTR, DIM) |
#define | FCB2CSTR(FSTR, CSTR, DIM) |
#define | cfDEREFERENCE0 |
#define | cfDEREFERENCE1 * |
#define | cfDEREFERENCE2 ** |
#define | cfDEREFERENCE3 *** |
#define | cfDEREFERENCE4 **** |
#define | cfDEREFERENCE5 ***** |
#define | cfelementsof(A, D) (sizeof(A)/sizeof(_(cfDEREFERENCE,D)(A))) |
#define | ZTRINGV_NUM(I) I |
#define | ZTRINGV_ARGFP(I) (*(_2(A,I))) |
#define | ZTRINGV_ARGF(I) _2(A,I) |
#define | ZTRINGV_ARGS(I) _2(B,I) |
#define | PBYTE_cfVP(A, B) PINT_cfVP(A,B) |
#define | PDOUBLE_cfVP(A, B) |
#define | PFLOAT_cfVP(A, B) |
#define | PINT_cfVP(A, B) |
#define | PLOGICAL_cfVP(A, B) int *B; |
#define | PLONG_cfVP(A, B) PINT_cfVP(A,B) |
#define | PSHORT_cfVP(A, B) PINT_cfVP(A,B) |
#define | VCF_INT_S(T, A, B) _(T,VVVVVVV_cfTYPE) B = A; |
#define | VCF_INT_F(T, A, B) _(T,_cfVCF)(A,B) |
#define | BYTE_cfVCF(A, B) |
#define | DOUBLE_cfVCF(A, B) |
#define | FLOAT_cfVCF(A, B) |
#define | INT_cfVCF(A, B) |
#define | LOGICAL_cfVCF(A, B) |
#define | LONG_cfVCF(A, B) |
#define | SHORT_cfVCF(A, B) |
#define | VCF(TN, I) _Icf4(4,V,TN,_(A,I),_(B,I),F) |
#define | VVCF(TN, AI, BI) _Icf4(4,V,TN,AI,BI,S) |
#define | INT_cfV(T, A, B, F) _(VCF_INT_,F)(T,A,B) |
#define | INTV_cfV(T, A, B, F) |
#define | INTVV_cfV(T, A, B, F) |
#define | INTVVV_cfV(T, A, B, F) |
#define | INTVVVV_cfV(T, A, B, F) |
#define | INTVVVVV_cfV(T, A, B, F) |
#define | INTVVVVVV_cfV(T, A, B, F) |
#define | INTVVVVVVV_cfV(T, A, B, F) |
#define | PINT_cfV(T, A, B, F) _(T,_cfVP)(A,B) |
#define | PVOID_cfV(T, A, B, F) |
#define | ROUTINE_cfV(T, A, B, F) |
#define | SIMPLE_cfV(T, A, B, F) |
#define | STRING_cfV(T, A, B, F) struct {unsigned int clen, flen;} B; |
#define | STRINGV_cfV(T, A, B, F) struct {char *s, *fs; unsigned flen;} B; |
#define | PSTRING_cfV(T, A, B, F) int B; |
#define | PSTRINGV_cfV(T, A, B, F) struct{char *fs; unsigned int sizeofA,flen;}B; |
#define | ZTRINGV_cfV(T, A, B, F) STRINGV_cfV(T,A,B,F) |
#define | PZTRINGV_cfV(T, A, B, F) PSTRINGV_cfV(T,A,B,F) |
#define | ACF(NAME, TN, AI, I) _(TN,_cfSTR)(4,A,NAME,I,AI,_(B,I),0) |
#define | DEFAULT_cfA(M, I, A, B) |
#define | LOGICAL_cfA(M, I, A, B) B=C2FLOGICAL(B); |
#define | PLOGICAL_cfA(M, I, A, B) A=C2FLOGICAL(A); |
#define | STRING_cfA(M, I, A, B) STRING_cfC(M,I,A,B,sizeof(A)) |
#define | PSTRING_cfA(M, I, A, B) PSTRING_cfC(M,I,A,B,sizeof(A)) |
#define | AATRINGV_cfA(A, B, sA, filA, silA) (B.s=(char *)malloc((sA)-(filA)),B.fs=c2fstrv(A,B.s,(B.flen=(silA)-1)+1,(sA))); |
#define | APATRINGV_cfA(A, B, sA, filA, silA) B.fs=c2fstrv(A,A,(B.flen=(silA)-1)+1,B.sizeofA=(sA)); |
#define | STRINGV_cfA(M, I, A, B) AATRINGV_cfA((char *)A,B,sizeof(A),firstindexlength(A),secondindexlength(A)) |
#define | PSTRINGV_cfA(M, I, A, B) APATRINGV_cfA((char *)A,B,sizeof(A),firstindexlength(A),secondindexlength(A)) |
#define | ZTRINGV_cfA(M, I, A, B) |
#define | PZTRINGV_cfA(M, I, A, B) |
#define | PBYTE_cfAAP(A, B) &A |
#define | PDOUBLE_cfAAP(A, B) &A |
#define | PFLOAT_cfAAP(A, B) FLOATVVVVVVV_cfPP &A |
#define | PINT_cfAAP(A, B) &A |
#define | PLOGICAL_cfAAP(A, B) B= &A |
#define | PLONG_cfAAP(A, B) &A |
#define | PSHORT_cfAAP(A, B) &A |
#define | AACF(TN, AI, I, C) _SEP_(TN,C,COMMA) _Icf(3,AA,TN,AI,_(B,I)) |
#define | INT_cfAA(T, A, B) &B |
#define | INTV_cfAA(T, A, B) _(T,VVVVVV_cfPP) A |
#define | INTVV_cfAA(T, A, B) _(T,VVVVV_cfPP) A[0] |
#define | INTVVV_cfAA(T, A, B) _(T,VVVV_cfPP) A[0][0] |
#define | INTVVVV_cfAA(T, A, B) _(T,VVV_cfPP) A[0][0][0] |
#define | INTVVVVV_cfAA(T, A, B) _(T,VV_cfPP) A[0][0][0][0] |
#define | INTVVVVVV_cfAA(T, A, B) _(T,V_cfPP) A[0][0][0][0][0] |
#define | INTVVVVVVV_cfAA(T, A, B) _(T,_cfPP) A[0][0][0][0][0][0] |
#define | PINT_cfAA(T, A, B) _(T,_cfAAP)(A,B) |
#define | PVOID_cfAA(T, A, B) (void *) A |
#define | ROUTINE_cfAA(T, A, B) (void(*)(CF_NULL_PROTO))A |
#define | STRING_cfAA(T, A, B) STRING_cfCC(T,A,B) |
#define | PSTRING_cfAA(T, A, B) PSTRING_cfCC(T,A,B) |
#define | STRINGV_cfAA(T, A, B) B.fs |
#define | PSTRINGV_cfAA(T, A, B) STRINGV_cfAA(T,A,B) |
#define | ZTRINGV_cfAA(T, A, B) STRINGV_cfAA(T,A,B) |
#define | PZTRINGV_cfAA(T, A, B) STRINGV_cfAA(T,A,B) |
#define | JCF(TN, I) _(TN,_cfSTR)(1,J,_(B,I), 0,0,0,0) |
#define | DEFAULT_cfJ(B) |
#define | LOGICAL_cfJ(B) DEFAULT_cfJ(B) |
#define | PLOGICAL_cfJ(B) DEFAULT_cfJ(B) |
#define | STRING_cfJ(B) ,B.flen |
#define | PSTRING_cfJ(B) ,B |
#define | STRINGV_cfJ(B) STRING_cfJ(B) |
#define | PSTRINGV_cfJ(B) STRING_cfJ(B) |
#define | ZTRINGV_cfJ(B) STRING_cfJ(B) |
#define | PZTRINGV_cfJ(B) STRING_cfJ(B) |
#define | KCF(TN, I) _(TN,_cfSTR)(1,KK,_(B,I), 0,0,0,0) |
#define | DEFAULT_cfKK(B) |
#define | LOGICAL_cfKK(B) DEFAULT_cfKK(B) |
#define | PLOGICAL_cfKK(B) DEFAULT_cfKK(B) |
#define | STRING_cfKK(B) , unsigned B |
#define | PSTRING_cfKK(B) STRING_cfKK(B) |
#define | STRINGV_cfKK(B) STRING_cfKK(B) |
#define | PSTRINGV_cfKK(B) STRING_cfKK(B) |
#define | ZTRINGV_cfKK(B) STRING_cfKK(B) |
#define | PZTRINGV_cfKK(B) STRING_cfKK(B) |
#define | WCF(TN, AN, I) _(TN,_cfSTR)(2,W,AN,_(B,I), 0,0,0) |
#define | DEFAULT_cfW(A, B) |
#define | LOGICAL_cfW(A, B) |
#define | PLOGICAL_cfW(A, B) *B=F2CLOGICAL(*B); |
#define | STRING_cfW(A, B) (A[B.clen]!='\0'?A[B.clen]='\0':0); |
#define | PSTRING_cfW(A, B) kill_trailing(A,' '); |
#define | STRINGV_cfW(A, B) free(B.s); |
#define | PSTRINGV_cfW(A, B) |
#define | ZTRINGV_cfW(A, B) STRINGV_cfW(A,B) |
#define | PZTRINGV_cfW(A, B) PSTRINGV_cfW(A,B) |
#define | NCF(TN, I, C) _SEP_(TN,C,COMMA) _Icf(2,N,TN,_(A,I),0) |
#define | NNCF(TN, I, C) UUCF(TN,I,C) |
#define | NNNCF(TN, I, C) _SEP_(TN,C,COLON) _Icf(2,N,TN,_(A,I),0) |
#define | INT_cfN(T, A) _(T,VVVVVVV_cfTYPE) * A |
#define | INTV_cfN(T, A) _(T,VVVVVV_cfTYPE) * A |
#define | INTVV_cfN(T, A) _(T,VVVVV_cfTYPE) * A |
#define | INTVVV_cfN(T, A) _(T,VVVV_cfTYPE) * A |
#define | INTVVVV_cfN(T, A) _(T,VVV_cfTYPE) * A |
#define | INTVVVVV_cfN(T, A) _(T,VV_cfTYPE) * A |
#define | INTVVVVVV_cfN(T, A) _(T,V_cfTYPE) * A |
#define | INTVVVVVVV_cfN(T, A) _(T,_cfTYPE) * A |
#define | PINT_cfN(T, A) _(T,_cfTYPE) * A |
#define | PVOID_cfN(T, A) void * A |
#define | ROUTINE_cfN(T, A) void ( *A)(CF_NULL_PROTO) |
#define | STRING_cfN(T, A) char * A |
#define | STRINGV_cfN(T, A) char * A |
#define | PSTRING_cfN(T, A) STRING_cfN(T,A) |
#define | PNSTRING_cfN(T, A) STRING_cfN(T,A) |
#define | PPSTRING_cfN(T, A) STRING_cfN(T,A) |
#define | PSTRINGV_cfN(T, A) STRINGV_cfN(T,A) |
#define | ZTRINGV_cfN(T, A) STRINGV_cfN(T,A) |
#define | PZTRINGV_cfN(T, A) PSTRINGV_cfN(T,A) |
#define | MAX_PREPRO_ARGS 99 |
#define | ABSOFT_cf1(T0) |
#define | ABSOFT_cf2(T0) |
#define | ABSOFT_cf3(T0) |
#define | _Z |
#define | CFARGT14S(S, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE) |
#define | CFARGT14FS(F, S, M, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE) |
#define | CFARGT14(F, S, M, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE) |
#define | CFARGT20(Z, S, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, TH, TI, TJ, TK) |
#define | CFARGTA14(F, S, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD, AE) |
#define | CFARGTA20(Z, S, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, TH, TI, TJ, TK, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD, AE, AF, AG, AH, AI, AJ, AK) |
#define | PROTOCCALLSFSUB1(UN, LN, T1) PROTOCCALLSFSUB14(UN,LN,T1,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB2(UN, LN, T1, T2) PROTOCCALLSFSUB14(UN,LN,T1,T2,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB3(UN, LN, T1, T2, T3) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB4(UN, LN, T1, T2, T3, T4) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB5(UN, LN, T1, T2, T3, T4, T5) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB6(UN, LN, T1, T2, T3, T4, T5, T6) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB7(UN, LN, T1, T2, T3, T4, T5, T6, T7) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB8(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB9(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB10(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB11(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB12(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,CF_0,CF_0) |
#define | PROTOCCALLSFSUB13(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,CF_0) |
#define | PROTOCCALLSFSUB15(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF) PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB16(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG) PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB17(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, TH) PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFSUB18(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, TH, TI) PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,CF_0,CF_0) |
#define | PROTOCCALLSFSUB19(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, TH, TI, TJ) PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,TJ,CF_0) |
#define | FCALLSC_QUALIFIER |
#define | CFextern extern |
#define | PROTOCCALLSFSUB0(UN, LN) CFextern void FCALLSC_QUALIFIER CFC_(UN,LN)(); |
#define | PROTOCCALLSFSUB14(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE) CFextern void FCALLSC_QUALIFIER CFC_(UN,LN)( CFARGT14(NCF,KCF,_Z,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE) ); |
#define | PROTOCCALLSFSUB20(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, TH, TI, TJ, TK) CFextern void FCALLSC_QUALIFIER CFC_(UN,LN)( CFARGT20(NCF,KCF,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,TJ,TK) ); |
#define | CCALLSFSUB1(UN, LN, T1,A1) CCALLSFSUB5 (UN,LN,T1,CF_0,CF_0,CF_0,CF_0,A1,0,0,0,0) |
#define | CCALLSFSUB2(UN, LN, T1, T2,A1, A2) CCALLSFSUB5 (UN,LN,T1,T2,CF_0,CF_0,CF_0,A1,A2,0,0,0) |
#define | CCALLSFSUB3(UN, LN, T1, T2, T3,A1, A2, A3) CCALLSFSUB5 (UN,LN,T1,T2,T3,CF_0,CF_0,A1,A2,A3,0,0) |
#define | CCALLSFSUB4(UN, LN, T1, T2, T3, T4,A1, A2, A3, A4) CCALLSFSUB5 (UN,LN,T1,T2,T3,T4,CF_0,A1,A2,A3,A4,0) |
#define | CCALLSFSUB5(UN, LN, T1, T2, T3, T4, T5,A1, A2, A3, A4, A5) CCALLSFSUB10(UN,LN,T1,T2,T3,T4,T5,CF_0,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,0,0,0,0,0) |
#define | CCALLSFSUB6(UN, LN, T1, T2, T3, T4, T5, T6,A1, A2, A3, A4, A5, A6) CCALLSFSUB10(UN,LN,T1,T2,T3,T4,T5,T6,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,0,0,0,0) |
#define | CCALLSFSUB7(UN, LN, T1, T2, T3, T4, T5, T6, T7,A1, A2, A3, A4, A5, A6, A7) CCALLSFSUB10(UN,LN,T1,T2,T3,T4,T5,T6,T7,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,0,0,0) |
#define | CCALLSFSUB8(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8,A1, A2, A3, A4, A5, A6, A7, A8) CCALLSFSUB10(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,0,0) |
#define | CCALLSFSUB9(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, A1, A2, A3, A4, A5, A6, A7, A8, A9) CCALLSFSUB10(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,0) |
#define | CCALLSFSUB10(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA) CCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,0,0,0,0) |
#define | CCALLSFSUB11(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB) CCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,0,0,0) |
#define | CCALLSFSUB12(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC) CCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,0,0) |
#define | CCALLSFSUB13(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD) CCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,0) |
#define | CPPPROTOCLSFSUB0(UN, LN) PROTOCCALLSFSUB0(UN,LN) |
#define | CPPPROTOCLSFSUB14(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE) PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE) |
#define | CPPPROTOCLSFSUB20(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, TH, TI, TJ, TK) PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,TJ,TK) |
#define | CCALLSFSUB0(UN, LN) do{CPPPROTOCLSFSUB0(UN,LN) CFC_(UN,LN)();}while(FALSE) |
#define | CCALLSFSUB14(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD, AE) |
#define | CCALLSFSUB15(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD, AE, AF) CCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,CF_0,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,0,0,0,0,0) |
#define | CCALLSFSUB16(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD, AE, AF, AG) CCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,AG,0,0,0,0) |
#define | CCALLSFSUB17(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, TH, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD, AE, AF, AG, AH) CCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,AG,AH,0,0,0) |
#define | CCALLSFSUB18(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, TH, TI, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD, AE, AF, AG, AH, AI) CCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,AG,AH,AI,0,0) |
#define | CCALLSFSUB19(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, TH, TI, TJ, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD, AE, AF, AG, AH, AI, AJ) CCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,TJ,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,AG,AH,AI,AJ,0) |
#define | CCALLSFSUB20(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, TF, TG, TH, TI, TJ, TK, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD, AE, AF, AG, AH, AI, AJ, AK) |
#define | MAX_LEN_FORTRAN_FUNCTION_STRING 0x4FE |
#define | CFORTRAN_NON_CHAR 0x7F |
#define | _SEP_(TN, C, COMMA) _(__SEP_,C)(TN,COMMA) |
#define | __SEP_0(TN, COMMA) |
#define | __SEP_1(TN, COMMA) _Icf(2,SEP,TN,COMMA,0) |
#define | INT_cfSEP(T, B) _(A,B) |
#define | INTV_cfSEP(T, B) INT_cfSEP(T,B) |
#define | INTVV_cfSEP(T, B) INT_cfSEP(T,B) |
#define | INTVVV_cfSEP(T, B) INT_cfSEP(T,B) |
#define | INTVVVV_cfSEP(T, B) INT_cfSEP(T,B) |
#define | INTVVVVV_cfSEP(T, B) INT_cfSEP(T,B) |
#define | INTVVVVVV_cfSEP(T, B) INT_cfSEP(T,B) |
#define | INTVVVVVVV_cfSEP(T, B) INT_cfSEP(T,B) |
#define | PINT_cfSEP(T, B) INT_cfSEP(T,B) |
#define | PVOID_cfSEP(T, B) INT_cfSEP(T,B) |
#define | ROUTINE_cfSEP(T, B) INT_cfSEP(T,B) |
#define | SIMPLE_cfSEP(T, B) INT_cfSEP(T,B) |
#define | VOID_cfSEP(T, B) INT_cfSEP(T,B) |
#define | STRING_cfSEP(T, B) INT_cfSEP(T,B) |
#define | STRINGV_cfSEP(T, B) INT_cfSEP(T,B) |
#define | PSTRING_cfSEP(T, B) INT_cfSEP(T,B) |
#define | PSTRINGV_cfSEP(T, B) INT_cfSEP(T,B) |
#define | PNSTRING_cfSEP(T, B) INT_cfSEP(T,B) |
#define | PPSTRING_cfSEP(T, B) INT_cfSEP(T,B) |
#define | ZTRINGV_cfSEP(T, B) INT_cfSEP(T,B) |
#define | PZTRINGV_cfSEP(T, B) INT_cfSEP(T,B) |
#define | INTEGER_BYTE signed char |
#define | BYTEVVVVVVV_cfTYPE INTEGER_BYTE |
#define | DOUBLEVVVVVVV_cfTYPE DOUBLE_PRECISION |
#define | FLOATVVVVVVV_cfTYPE FORTRAN_REAL |
#define | INTVVVVVVV_cfTYPE int |
#define | LOGICALVVVVVVV_cfTYPE int |
#define | LONGVVVVVVV_cfTYPE long |
#define | SHORTVVVVVVV_cfTYPE short |
#define | PBYTE_cfTYPE INTEGER_BYTE |
#define | PDOUBLE_cfTYPE DOUBLE_PRECISION |
#define | PFLOAT_cfTYPE FORTRAN_REAL |
#define | PINT_cfTYPE int |
#define | PLOGICAL_cfTYPE int |
#define | PLONG_cfTYPE long |
#define | PSHORT_cfTYPE short |
#define | CFARGS0(A, T, V, W, X, Y, Z) _3(T,_cf,A) |
#define | CFARGS1(A, T, V, W, X, Y, Z) _3(T,_cf,A)(V) |
#define | CFARGS2(A, T, V, W, X, Y, Z) _3(T,_cf,A)(V,W) |
#define | CFARGS3(A, T, V, W, X, Y, Z) _3(T,_cf,A)(V,W,X) |
#define | CFARGS4(A, T, V, W, X, Y, Z) _3(T,_cf,A)(V,W,X,Y) |
#define | CFARGS5(A, T, V, W, X, Y, Z) _3(T,_cf,A)(V,W,X,Y,Z) |
#define | _Icf(N, T, I, X, Y) _(I,_cfINT)(N,T,I,X,Y,0) |
#define | _Icf4(N, T, I, X, Y, Z) _(I,_cfINT)(N,T,I,X,Y,Z) |
#define | BYTE_cfINT(N, A, B, X, Y, Z) DOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | DOUBLE_cfINT(N, A, B, X, Y, Z) _(CFARGS,N)(A,INT,B,X,Y,Z,0) |
#define | FLOAT_cfINT(N, A, B, X, Y, Z) DOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | INT_cfINT(N, A, B, X, Y, Z) DOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | LOGICAL_cfINT(N, A, B, X, Y, Z) DOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | LONG_cfINT(N, A, B, X, Y, Z) DOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | SHORT_cfINT(N, A, B, X, Y, Z) DOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | PBYTE_cfINT(N, A, B, X, Y, Z) PDOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | PDOUBLE_cfINT(N, A, B, X, Y, Z) _(CFARGS,N)(A,PINT,B,X,Y,Z,0) |
#define | PFLOAT_cfINT(N, A, B, X, Y, Z) PDOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | PINT_cfINT(N, A, B, X, Y, Z) PDOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | PLOGICAL_cfINT(N, A, B, X, Y, Z) PDOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | PLONG_cfINT(N, A, B, X, Y, Z) PDOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | PSHORT_cfINT(N, A, B, X, Y, Z) PDOUBLE_cfINT(N,A,B,X,Y,Z) |
#define | BYTEV_cfINT(N, A, B, X, Y, Z) DOUBLEV_cfINT(N,A,B,X,Y,Z) |
#define | BYTEVV_cfINT(N, A, B, X, Y, Z) DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
#define | BYTEVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
#define | BYTEVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
#define | BYTEVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | BYTEVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | BYTEVVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | DOUBLEV_cfINT(N, A, B, X, Y, Z) _(CFARGS,N)(A,INTV,B,X,Y,Z,0) |
#define | DOUBLEVV_cfINT(N, A, B, X, Y, Z) _(CFARGS,N)(A,INTVV,B,X,Y,Z,0) |
#define | DOUBLEVVV_cfINT(N, A, B, X, Y, Z) _(CFARGS,N)(A,INTVVV,B,X,Y,Z,0) |
#define | DOUBLEVVVV_cfINT(N, A, B, X, Y, Z) _(CFARGS,N)(A,INTVVVV,B,X,Y,Z,0) |
#define | DOUBLEVVVVV_cfINT(N, A, B, X, Y, Z) _(CFARGS,N)(A,INTVVVVV,B,X,Y,Z,0) |
#define | DOUBLEVVVVVV_cfINT(N, A, B, X, Y, Z) _(CFARGS,N)(A,INTVVVVVV,B,X,Y,Z,0) |
#define | DOUBLEVVVVVVV_cfINT(N, A, B, X, Y, Z) _(CFARGS,N)(A,INTVVVVVVV,B,X,Y,Z,0) |
#define | FLOATV_cfINT(N, A, B, X, Y, Z) DOUBLEV_cfINT(N,A,B,X,Y,Z) |
#define | FLOATVV_cfINT(N, A, B, X, Y, Z) DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
#define | FLOATVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
#define | FLOATVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
#define | FLOATVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | FLOATVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | FLOATVVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | INTV_cfINT(N, A, B, X, Y, Z) DOUBLEV_cfINT(N,A,B,X,Y,Z) |
#define | INTVV_cfINT(N, A, B, X, Y, Z) DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
#define | INTVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
#define | INTVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
#define | INTVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | INTVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | INTVVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | LOGICALV_cfINT(N, A, B, X, Y, Z) DOUBLEV_cfINT(N,A,B,X,Y,Z) |
#define | LOGICALVV_cfINT(N, A, B, X, Y, Z) DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
#define | LOGICALVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
#define | LOGICALVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
#define | LOGICALVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | LOGICALVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | LOGICALVVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | LONGV_cfINT(N, A, B, X, Y, Z) DOUBLEV_cfINT(N,A,B,X,Y,Z) |
#define | LONGVV_cfINT(N, A, B, X, Y, Z) DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
#define | LONGVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
#define | LONGVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
#define | LONGVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | LONGVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | LONGVVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | SHORTV_cfINT(N, A, B, X, Y, Z) DOUBLEV_cfINT(N,A,B,X,Y,Z) |
#define | SHORTVV_cfINT(N, A, B, X, Y, Z) DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
#define | SHORTVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
#define | SHORTVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
#define | SHORTVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | SHORTVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | SHORTVVVVVVV_cfINT(N, A, B, X, Y, Z) DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
#define | PVOID_cfINT(N, A, B, X, Y, Z) _(CFARGS,N)(A,B,B,X,Y,Z,0) |
#define | ROUTINE_cfINT(N, A, B, X, Y, Z) PVOID_cfINT(N,A,B,X,Y,Z) |
#define | SIMPLE_cfINT(N, A, B, X, Y, Z) PVOID_cfINT(N,A,B,X,Y,Z) |
#define | VOID_cfINT(N, A, B, X, Y, Z) PVOID_cfINT(N,A,B,X,Y,Z) |
#define | STRING_cfINT(N, A, B, X, Y, Z) PVOID_cfINT(N,A,B,X,Y,Z) |
#define | STRINGV_cfINT(N, A, B, X, Y, Z) PVOID_cfINT(N,A,B,X,Y,Z) |
#define | PSTRING_cfINT(N, A, B, X, Y, Z) PVOID_cfINT(N,A,B,X,Y,Z) |
#define | PSTRINGV_cfINT(N, A, B, X, Y, Z) PVOID_cfINT(N,A,B,X,Y,Z) |
#define | PNSTRING_cfINT(N, A, B, X, Y, Z) PVOID_cfINT(N,A,B,X,Y,Z) |
#define | PPSTRING_cfINT(N, A, B, X, Y, Z) PVOID_cfINT(N,A,B,X,Y,Z) |
#define | ZTRINGV_cfINT(N, A, B, X, Y, Z) PVOID_cfINT(N,A,B,X,Y,Z) |
#define | PZTRINGV_cfINT(N, A, B, X, Y, Z) PVOID_cfINT(N,A,B,X,Y,Z) |
#define | CF_0_cfINT(N, A, B, X, Y, Z) |
#define | UCF(TN, I, C) _SEP_(TN,C,COMMA) _Icf(2,U,TN,_(A,I),0) |
#define | UUCF(TN, I, C) _SEP_(TN,C,COMMA) _SEP_(TN,1,I) |
#define | UUUCF(TN, I, C) _SEP_(TN,C,COLON) _Icf(2,U,TN,_(A,I),0) |
#define | INT_cfU(T, A) _(T,VVVVVVV_cfTYPE) A |
#define | INTV_cfU(T, A) _(T,VVVVVV_cfTYPE) * A |
#define | INTVV_cfU(T, A) _(T,VVVVV_cfTYPE) * A |
#define | INTVVV_cfU(T, A) _(T,VVVV_cfTYPE) * A |
#define | INTVVVV_cfU(T, A) _(T,VVV_cfTYPE) * A |
#define | INTVVVVV_cfU(T, A) _(T,VV_cfTYPE) * A |
#define | INTVVVVVV_cfU(T, A) _(T,V_cfTYPE) * A |
#define | INTVVVVVVV_cfU(T, A) _(T,_cfTYPE) * A |
#define | PINT_cfU(T, A) _(T,_cfTYPE) * A |
#define | PVOID_cfU(T, A) void *A |
#define | ROUTINE_cfU(T, A) void (*A)(CF_NULL_PROTO) |
#define | VOID_cfU(T, A) void A |
#define | STRING_cfU(T, A) char *A |
#define | STRINGV_cfU(T, A) char *A |
#define | PSTRING_cfU(T, A) char *A |
#define | PSTRINGV_cfU(T, A) char *A |
#define | ZTRINGV_cfU(T, A) char *A |
#define | PZTRINGV_cfU(T, A) char *A |
#define | INT_cfUU(T, A) _(T,VVVVVVV_cfTYPE) A |
#define | VOID_cfUU(T, A) |
#define | STRING_cfUU(T, A) char *A |
#define | BYTE_cfPU(A) CFextern INTEGER_BYTE FCALLSC_QUALIFIER A |
#define | DOUBLE_cfPU(A) CFextern DOUBLE_PRECISION FCALLSC_QUALIFIER A |
#define | FLOAT_cfPU(A) CFextern FORTRAN_REAL FCALLSC_QUALIFIER A |
#define | INT_cfPU(A) CFextern int FCALLSC_QUALIFIER A |
#define | LOGICAL_cfPU(A) CFextern int FCALLSC_QUALIFIER A |
#define | LONG_cfPU(A) CFextern long FCALLSC_QUALIFIER A |
#define | SHORT_cfPU(A) CFextern short FCALLSC_QUALIFIER A |
#define | STRING_cfPU(A) CFextern void FCALLSC_QUALIFIER A |
#define | VOID_cfPU(A) CFextern void FCALLSC_QUALIFIER A |
#define | BYTE_cfE INTEGER_BYTE A0; |
#define | DOUBLE_cfE DOUBLE_PRECISION A0; |
#define | FLOAT_cfE FORTRAN_REAL A0; |
#define | INT_cfE int A0; |
#define | LOGICAL_cfE int A0; |
#define | LONG_cfE long A0; |
#define | SHORT_cfE short A0; |
#define | VOID_cfE |
#define | STRING_cfE |
#define | INT_cfGZ(T, UN, LN) A0=CFC_(UN,LN)( |
#define | VOID_cfGZ(T, UN, LN) CFC_(UN,LN)( |
#define | STRING_cfGZ(T, UN, LN) CFC_(UN,LN)( A0,MAX_LEN_FORTRAN_FUNCTION_STRING |
#define | INT_cfG(T, UN, LN) INT_cfGZ(T,UN,LN) |
#define | VOID_cfG(T, UN, LN) VOID_cfGZ(T,UN,LN) |
#define | STRING_cfG(T, UN, LN) STRING_cfGZ(T,UN,LN), |
#define | BYTEVVVVVVV_cfPP |
#define | INTVVVVVVV_cfPP |
#define | DOUBLEVVVVVVV_cfPP |
#define | LOGICALVVVVVVV_cfPP |
#define | LONGVVVVVVV_cfPP |
#define | SHORTVVVVVVV_cfPP |
#define | PBYTE_cfPP |
#define | PINT_cfPP |
#define | PDOUBLE_cfPP |
#define | PLOGICAL_cfPP |
#define | PLONG_cfPP |
#define | PSHORT_cfPP |
#define | PFLOAT_cfPP FLOATVVVVVVV_cfPP |
#define | BCF(TN, AN, C) _SEP_(TN,C,COMMA) _Icf(2,B,TN,AN,0) |
#define | INT_cfB(T, A) (_(T,VVVVVVV_cfTYPE)) A |
#define | INTV_cfB(T, A) A |
#define | INTVV_cfB(T, A) (A)[0] |
#define | INTVVV_cfB(T, A) (A)[0][0] |
#define | INTVVVV_cfB(T, A) (A)[0][0][0] |
#define | INTVVVVV_cfB(T, A) (A)[0][0][0][0] |
#define | INTVVVVVV_cfB(T, A) (A)[0][0][0][0][0] |
#define | INTVVVVVVV_cfB(T, A) (A)[0][0][0][0][0][0] |
#define | PINT_cfB(T, A) _(T,_cfPP)&A |
#define | STRING_cfB(T, A) (char *) A |
#define | STRINGV_cfB(T, A) (char *) A |
#define | PSTRING_cfB(T, A) (char *) A |
#define | PSTRINGV_cfB(T, A) (char *) A |
#define | PVOID_cfB(T, A) (void *) A |
#define | ROUTINE_cfB(T, A) (void(*)(CF_NULL_PROTO))A |
#define | ZTRINGV_cfB(T, A) (char *) A |
#define | PZTRINGV_cfB(T, A) (char *) A |
#define | SCF(TN, NAME, I, A) _(TN,_cfSTR)(3,S,NAME,I,A,0,0) |
#define | DEFAULT_cfS(M, I, A) |
#define | LOGICAL_cfS(M, I, A) |
#define | PLOGICAL_cfS(M, I, A) |
#define | STRING_cfS(M, I, A) ,sizeof(A) |
#define | STRINGV_cfS(M, I, A) |
#define | PSTRING_cfS(M, I, A) ,sizeof(A) |
#define | PSTRINGV_cfS(M, I, A) STRINGV_cfS(M,I,A) |
#define | ZTRINGV_cfS(M, I, A) |
#define | PZTRINGV_cfS(M, I, A) |
#define | HCF(TN, I) _(TN,_cfSTR)(3,H,COMMA, H,_(C,I),0,0) |
#define | HHCF(TN, I) _(TN,_cfSTR)(3,H,COMMA,HH,_(C,I),0,0) |
#define | HHHCF(TN, I) _(TN,_cfSTR)(3,H,COLON, H,_(C,I),0,0) |
#define | H_CF_SPECIAL unsigned |
#define | HH_CF_SPECIAL |
#define | DEFAULT_cfH(M, I, A) |
#define | LOGICAL_cfH(S, U, B) |
#define | PLOGICAL_cfH(S, U, B) |
#define | STRING_cfH(S, U, B) _(A,S) _(U,_CF_SPECIAL) B |
#define | STRINGV_cfH(S, U, B) STRING_cfH(S,U,B) |
#define | PSTRING_cfH(S, U, B) STRING_cfH(S,U,B) |
#define | PSTRINGV_cfH(S, U, B) STRING_cfH(S,U,B) |
#define | PNSTRING_cfH(S, U, B) STRING_cfH(S,U,B) |
#define | PPSTRING_cfH(S, U, B) STRING_cfH(S,U,B) |
#define | ZTRINGV_cfH(S, U, B) |
#define | PZTRINGV_cfH(S, U, B) |
#define | VOID_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | BYTE_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | DOUBLE_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | FLOAT_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | INT_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LOGICAL_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,LOGICAL,A,B,C,D,E) |
#define | LONG_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | SHORT_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | BYTEV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | BYTEVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | BYTEVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | BYTEVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | BYTEVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | BYTEVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | BYTEVVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | DOUBLEV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | DOUBLEVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | DOUBLEVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | DOUBLEVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | DOUBLEVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | DOUBLEVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | DOUBLEVVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | FLOATV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | FLOATVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | FLOATVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | FLOATVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | FLOATVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | FLOATVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | FLOATVVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | INTV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | INTVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | INTVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | INTVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | INTVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | INTVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | INTVVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LOGICALV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LOGICALVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LOGICALVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LOGICALVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LOGICALVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LOGICALVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LOGICALVVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LONGV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LONGVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LONGVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LONGVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LONGVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LONGVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | LONGVVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | SHORTV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | SHORTVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | SHORTVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | SHORTVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | SHORTVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | SHORTVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | SHORTVVVVVVV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | PBYTE_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | PDOUBLE_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | PFLOAT_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | PINT_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | PLOGICAL_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,PLOGICAL,A,B,C,D,E) |
#define | PLONG_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | PSHORT_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | STRING_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,STRING,A,B,C,D,E) |
#define | PSTRING_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,PSTRING,A,B,C,D,E) |
#define | STRINGV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,STRINGV,A,B,C,D,E) |
#define | PSTRINGV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,PSTRINGV,A,B,C,D,E) |
#define | PNSTRING_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,PNSTRING,A,B,C,D,E) |
#define | PPSTRING_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,PPSTRING,A,B,C,D,E) |
#define | PVOID_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | ROUTINE_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | SIMPLE_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
#define | ZTRINGV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,ZTRINGV,A,B,C,D,E) |
#define | PZTRINGV_cfSTR(N, T, A, B, C, D, E) _(CFARGS,N)(T,PZTRINGV,A,B,C,D,E) |
#define | CF_0_cfSTR(N, T, A, B, C, D, E) |
#define | CCF(NAME, TN, I) _(TN,_cfSTR)(5,C,NAME,I,_(A,I),_(B,I),_(C,I)) |
#define | DEFAULT_cfC(M, I, A, B, C) |
#define | LOGICAL_cfC(M, I, A, B, C) A=C2FLOGICAL( A); |
#define | PLOGICAL_cfC(M, I, A, B, C) *A=C2FLOGICAL(*A); |
#define | STRING_cfC(M, I, A, B, C) |
#define | PSTRING_cfC(M, I, A, B, C) |
#define | STRINGV_cfC(M, I, A, B, C) AATRINGV_cfA( A,B,(C/0xFFFF)*(C%0xFFFF),C/0xFFFF,C%0xFFFF) |
#define | PSTRINGV_cfC(M, I, A, B, C) APATRINGV_cfA( A,B,(C/0xFFFF)*(C%0xFFFF),C/0xFFFF,C%0xFFFF) |
#define | ZTRINGV_cfC(M, I, A, B, C) |
#define | PZTRINGV_cfC(M, I, A, B, C) |
#define | BYTE_cfCCC(A, B) &A |
#define | DOUBLE_cfCCC(A, B) &A |
#define | FLOAT_cfCCC(A, B) &A |
#define | INT_cfCCC(A, B) &A |
#define | LOGICAL_cfCCC(A, B) &A |
#define | LONG_cfCCC(A, B) &A |
#define | SHORT_cfCCC(A, B) &A |
#define | PBYTE_cfCCC(A, B) A |
#define | PDOUBLE_cfCCC(A, B) A |
#define | PFLOAT_cfCCC(A, B) A |
#define | PINT_cfCCC(A, B) A |
#define | PLOGICAL_cfCCC(A, B) B=A |
#define | PLONG_cfCCC(A, B) A |
#define | PSHORT_cfCCC(A, B) A |
#define | CCCF(TN, I, M) _SEP_(TN,M,COMMA) _Icf(3,CC,TN,_(A,I),_(B,I)) |
#define | INT_cfCC(T, A, B) _(T,_cfCCC)(A,B) |
#define | INTV_cfCC(T, A, B) A |
#define | INTVV_cfCC(T, A, B) A |
#define | INTVVV_cfCC(T, A, B) A |
#define | INTVVVV_cfCC(T, A, B) A |
#define | INTVVVVV_cfCC(T, A, B) A |
#define | INTVVVVVV_cfCC(T, A, B) A |
#define | INTVVVVVVV_cfCC(T, A, B) A |
#define | PINT_cfCC(T, A, B) _(T,_cfCCC)(A,B) |
#define | PVOID_cfCC(T, A, B) A |
#define | ROUTINE_cfCC(T, A, B) A |
#define | SIMPLE_cfCC(T, A, B) A |
#define | STRING_cfCC(T, A, B) A |
#define | STRINGV_cfCC(T, A, B) B.fs |
#define | PSTRING_cfCC(T, A, B) A |
#define | PSTRINGV_cfCC(T, A, B) B.fs |
#define | ZTRINGV_cfCC(T, A, B) STRINGV_cfCC(T,A,B) |
#define | PZTRINGV_cfCC(T, A, B) PSTRINGV_cfCC(T,A,B) |
#define | BYTE_cfX return A0; |
#define | DOUBLE_cfX return A0; |
#define | FLOAT_cfX return A0; |
#define | INT_cfX return A0; |
#define | LOGICAL_cfX return F2CLOGICAL(A0); |
#define | LONG_cfX return A0; |
#define | SHORT_cfX return A0; |
#define | VOID_cfX return ; |
#define | STRING_cfX |
#define | CFFUN(NAME) _(__cf__,NAME) |
#define | CCALLSFFUN0(UN, LN) CFFUN(UN)() |
#define | CCALLSFFUN1(UN, LN, T1,A1) CCALLSFFUN5 (UN,LN,T1,CF_0,CF_0,CF_0,CF_0,A1,0,0,0,0) |
#define | CCALLSFFUN2(UN, LN, T1, T2,A1, A2) CCALLSFFUN5 (UN,LN,T1,T2,CF_0,CF_0,CF_0,A1,A2,0,0,0) |
#define | CCALLSFFUN3(UN, LN, T1, T2, T3,A1, A2, A3) CCALLSFFUN5 (UN,LN,T1,T2,T3,CF_0,CF_0,A1,A2,A3,0,0) |
#define | CCALLSFFUN4(UN, LN, T1, T2, T3, T4,A1, A2, A3, A4) CCALLSFFUN5 (UN,LN,T1,T2,T3,T4,CF_0,A1,A2,A3,A4,0) |
#define | CCALLSFFUN5(UN, LN, T1, T2, T3, T4, T5,A1, A2, A3, A4, A5) CCALLSFFUN10(UN,LN,T1,T2,T3,T4,T5,CF_0,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,0,0,0,0,0) |
#define | CCALLSFFUN6(UN, LN, T1, T2, T3, T4, T5, T6,A1, A2, A3, A4, A5, A6) CCALLSFFUN10(UN,LN,T1,T2,T3,T4,T5,T6,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,0,0,0,0) |
#define | CCALLSFFUN7(UN, LN, T1, T2, T3, T4, T5, T6, T7,A1, A2, A3, A4, A5, A6, A7) CCALLSFFUN10(UN,LN,T1,T2,T3,T4,T5,T6,T7,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,0,0,0) |
#define | CCALLSFFUN8(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8,A1, A2, A3, A4, A5, A6, A7, A8) CCALLSFFUN10(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,0,0) |
#define | CCALLSFFUN9(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, A1, A2, A3, A4, A5, A6, A7, A8, A9) CCALLSFFUN10(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,0) |
#define | CCALLSFFUN10(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA) CCALLSFFUN14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,0,0,0,0) |
#define | CCALLSFFUN11(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB) CCALLSFFUN14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,0,0,0) |
#define | CCALLSFFUN12(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC) CCALLSFFUN14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,0,0) |
#define | CCALLSFFUN13(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD) CCALLSFFUN14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,0) |
#define | CCALLSFFUN14(UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE, A1, A2, A3, A4, A5, A6, A7, A8, A9, AA, AB, AC, AD, AE) |
#define | PROTOCCALLSFFUN0(F, UN, LN) |
#define | PROTOCCALLSFFUN1(T0, UN, LN, T1) PROTOCCALLSFFUN5 (T0,UN,LN,T1,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFFUN2(T0, UN, LN, T1, T2) PROTOCCALLSFFUN5 (T0,UN,LN,T1,T2,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFFUN3(T0, UN, LN, T1, T2, T3) PROTOCCALLSFFUN5 (T0,UN,LN,T1,T2,T3,CF_0,CF_0) |
#define | PROTOCCALLSFFUN4(T0, UN, LN, T1, T2, T3, T4) PROTOCCALLSFFUN5 (T0,UN,LN,T1,T2,T3,T4,CF_0) |
#define | PROTOCCALLSFFUN5(T0, UN, LN, T1, T2, T3, T4, T5) PROTOCCALLSFFUN10(T0,UN,LN,T1,T2,T3,T4,T5,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFFUN6(T0, UN, LN, T1, T2, T3, T4, T5, T6) PROTOCCALLSFFUN10(T0,UN,LN,T1,T2,T3,T4,T5,T6,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFFUN7(T0, UN, LN, T1, T2, T3, T4, T5, T6, T7) PROTOCCALLSFFUN10(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFFUN8(T0, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8) PROTOCCALLSFFUN10(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,CF_0,CF_0) |
#define | PROTOCCALLSFFUN9(T0, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9) PROTOCCALLSFFUN10(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,CF_0) |
#define | PROTOCCALLSFFUN10(T0, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA) PROTOCCALLSFFUN14(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,CF_0,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFFUN11(T0, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB) PROTOCCALLSFFUN14(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,CF_0,CF_0,CF_0) |
#define | PROTOCCALLSFFUN12(T0, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC) PROTOCCALLSFFUN14(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,CF_0,CF_0) |
#define | PROTOCCALLSFFUN13(T0, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD) PROTOCCALLSFFUN14(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,CF_0) |
#define | PROTOCCALLSFFUN14(T0, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE) |
#define | DCF(TN, I) HCF(TN,I) |
#define | DDCF(TN, I) HHCF(TN,I) |
#define | DDDCF(TN, I) HHHCF(TN,I) |
#define | QCF(TN, I) _(TN,_cfSTR)(1,Q,_(B,I), 0,0,0,0) |
#define | DEFAULT_cfQ(B) |
#define | LOGICAL_cfQ(B) |
#define | PLOGICAL_cfQ(B) |
#define | STRINGV_cfQ(B) char *B; unsigned int _(B,N); |
#define | STRING_cfQ(B) char *B=NULL; |
#define | PSTRING_cfQ(B) char *B=NULL; |
#define | PSTRINGV_cfQ(B) STRINGV_cfQ(B) |
#define | PNSTRING_cfQ(B) char *B=NULL; |
#define | PPSTRING_cfQ(B) |
#define | ROUTINE_orig (void *) |
#define | ROUTINE_1 ROUTINE_orig |
#define | ROUTINE_2 ROUTINE_orig |
#define | ROUTINE_3 ROUTINE_orig |
#define | ROUTINE_4 ROUTINE_orig |
#define | ROUTINE_5 ROUTINE_orig |
#define | ROUTINE_6 ROUTINE_orig |
#define | ROUTINE_7 ROUTINE_orig |
#define | ROUTINE_8 ROUTINE_orig |
#define | ROUTINE_9 ROUTINE_orig |
#define | ROUTINE_10 ROUTINE_orig |
#define | ROUTINE_11 ROUTINE_orig |
#define | ROUTINE_12 ROUTINE_orig |
#define | ROUTINE_13 ROUTINE_orig |
#define | ROUTINE_14 ROUTINE_orig |
#define | TCF(NAME, TN, I, M) _SEP_(TN,M,COMMA) _(TN,_cfT)(NAME,I,_(A,I),_(B,I),_(C,I)) |
#define | BYTE_cfT(M, I, A, B, D) *A |
#define | DOUBLE_cfT(M, I, A, B, D) *A |
#define | FLOAT_cfT(M, I, A, B, D) *A |
#define | INT_cfT(M, I, A, B, D) *A |
#define | LOGICAL_cfT(M, I, A, B, D) F2CLOGICAL(*A) |
#define | LONG_cfT(M, I, A, B, D) *A |
#define | SHORT_cfT(M, I, A, B, D) *A |
#define | BYTEV_cfT(M, I, A, B, D) A |
#define | DOUBLEV_cfT(M, I, A, B, D) A |
#define | FLOATV_cfT(M, I, A, B, D) VOIDP A |
#define | INTV_cfT(M, I, A, B, D) A |
#define | LOGICALV_cfT(M, I, A, B, D) A |
#define | LONGV_cfT(M, I, A, B, D) A |
#define | SHORTV_cfT(M, I, A, B, D) A |
#define | BYTEVV_cfT(M, I, A, B, D) (void *)A |
#define | BYTEVVV_cfT(M, I, A, B, D) (void *)A |
#define | BYTEVVVV_cfT(M, I, A, B, D) (void *)A |
#define | BYTEVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | BYTEVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | BYTEVVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | DOUBLEVV_cfT(M, I, A, B, D) (void *)A |
#define | DOUBLEVVV_cfT(M, I, A, B, D) (void *)A |
#define | DOUBLEVVVV_cfT(M, I, A, B, D) (void *)A |
#define | DOUBLEVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | DOUBLEVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | DOUBLEVVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | FLOATVV_cfT(M, I, A, B, D) (void *)A |
#define | FLOATVVV_cfT(M, I, A, B, D) (void *)A |
#define | FLOATVVVV_cfT(M, I, A, B, D) (void *)A |
#define | FLOATVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | FLOATVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | FLOATVVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | INTVV_cfT(M, I, A, B, D) (void *)A |
#define | INTVVV_cfT(M, I, A, B, D) (void *)A |
#define | INTVVVV_cfT(M, I, A, B, D) (void *)A |
#define | INTVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | INTVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | INTVVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | LOGICALVV_cfT(M, I, A, B, D) (void *)A |
#define | LOGICALVVV_cfT(M, I, A, B, D) (void *)A |
#define | LOGICALVVVV_cfT(M, I, A, B, D) (void *)A |
#define | LOGICALVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | LOGICALVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | LOGICALVVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | LONGVV_cfT(M, I, A, B, D) (void *)A |
#define | LONGVVV_cfT(M, I, A, B, D) (void *)A |
#define | LONGVVVV_cfT(M, I, A, B, D) (void *)A |
#define | LONGVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | LONGVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | LONGVVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | SHORTVV_cfT(M, I, A, B, D) (void *)A |
#define | SHORTVVV_cfT(M, I, A, B, D) (void *)A |
#define | SHORTVVVV_cfT(M, I, A, B, D) (void *)A |
#define | SHORTVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | SHORTVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | SHORTVVVVVVV_cfT(M, I, A, B, D) (void *)A |
#define | PBYTE_cfT(M, I, A, B, D) A |
#define | PDOUBLE_cfT(M, I, A, B, D) A |
#define | PFLOAT_cfT(M, I, A, B, D) VOIDP A |
#define | PINT_cfT(M, I, A, B, D) A |
#define | PLOGICAL_cfT(M, I, A, B, D) ((*A=F2CLOGICAL(*A)),A) |
#define | PLONG_cfT(M, I, A, B, D) A |
#define | PSHORT_cfT(M, I, A, B, D) A |
#define | PVOID_cfT(M, I, A, B, D) A |
#define | ROUTINE_cfT(M, I, A, B, D) _(ROUTINE_,I) A |
#define | TTSTR(A, B, D) ((B=(char*)malloc(D+1))[D]='\0', memcpy(B,A,D), kill_trailing(B,' ')) |
#define | TTTTSTR(A, B, D) |
#define | TTTTSTRV(A, B, D, E) |
#define | STRING_cfT(M, I, A, B, D) TTTTSTR( A,B,D) |
#define | STRINGV_cfT(M, I, A, B, D) TTTTSTRV(A,B,D, num_elem(A,D,_3(M,_STRV_A,I))) |
#define | PSTRING_cfT(M, I, A, B, D) TTSTR( A,B,D) |
#define | PPSTRING_cfT(M, I, A, B, D) A |
#define | PNSTRING_cfT(M, I, A, B, D) STRING_cfT(M,I,A,B,D) |
#define | PSTRINGV_cfT(M, I, A, B, D) STRINGV_cfT(M,I,A,B,D) |
#define | CF_0_cfT(M, I, A, B, D) |
#define | RCF(TN, I) _(TN,_cfSTR)(3,R,_(A,I),_(B,I),_(C,I),0,0) |
#define | DEFAULT_cfR(A, B, D) |
#define | LOGICAL_cfR(A, B, D) |
#define | PLOGICAL_cfR(A, B, D) *A=C2FLOGICAL(*A); |
#define | STRING_cfR(A, B, D) if (B) free(B); |
#define | STRINGV_cfR(A, B, D) free(B); |
#define | RRRRPSTR(A, B, D) |
#define | RRRRPSTRV(A, B, D) c2fstrv(B,A,D+1,(D+1)*_(B,N)), free(B); |
#define | PSTRING_cfR(A, B, D) RRRRPSTR( A,B,D) |
#define | PSTRINGV_cfR(A, B, D) RRRRPSTRV(A,B,D) |
#define | PNSTRING_cfR(A, B, D) PSTRING_cfR(A,B,D) |
#define | PPSTRING_cfR(A, B, D) |
#define | BYTE_cfFZ(UN, LN) INTEGER_BYTE FCALLSC_QUALIFIER fcallsc(UN,LN)( |
#define | DOUBLE_cfFZ(UN, LN) DOUBLE_PRECISION FCALLSC_QUALIFIER fcallsc(UN,LN)( |
#define | INT_cfFZ(UN, LN) int FCALLSC_QUALIFIER fcallsc(UN,LN)( |
#define | LOGICAL_cfFZ(UN, LN) int FCALLSC_QUALIFIER fcallsc(UN,LN)( |
#define | LONG_cfFZ(UN, LN) long FCALLSC_QUALIFIER fcallsc(UN,LN)( |
#define | SHORT_cfFZ(UN, LN) short FCALLSC_QUALIFIER fcallsc(UN,LN)( |
#define | VOID_cfFZ(UN, LN) void FCALLSC_QUALIFIER fcallsc(UN,LN)( |
#define | FLOAT_cfFZ(UN, LN) FORTRAN_REAL FCALLSC_QUALIFIER fcallsc(UN,LN)(void |
#define | STRING_cfFZ(UN, LN) void FCALLSC_QUALIFIER fcallsc(UN,LN)(char *AS, unsigned D0 |
#define | BYTE_cfF(UN, LN) BYTE_cfFZ(UN,LN) |
#define | DOUBLE_cfF(UN, LN) DOUBLE_cfFZ(UN,LN) |
#define | FLOAT_cfF(UN, LN) FORTRAN_REAL FCALLSC_QUALIFIER fcallsc(UN,LN)( |
#define | INT_cfF(UN, LN) INT_cfFZ(UN,LN) |
#define | LOGICAL_cfF(UN, LN) LOGICAL_cfFZ(UN,LN) |
#define | LONG_cfF(UN, LN) LONG_cfFZ(UN,LN) |
#define | SHORT_cfF(UN, LN) SHORT_cfFZ(UN,LN) |
#define | VOID_cfF(UN, LN) VOID_cfFZ(UN,LN) |
#define | STRING_cfF(UN, LN) STRING_cfFZ(UN,LN), |
#define | INT_cfFF |
#define | VOID_cfFF |
#define | STRING_cfFF char *AS; unsigned D0; |
#define | INT_cfL A0= |
#define | STRING_cfL A0= |
#define | VOID_cfL |
#define | INT_cfK |
#define | VOID_cfK |
#define | STRING_cfK |
#define | BYTE_cfI return A0; |
#define | DOUBLE_cfI return A0; |
#define | FLOAT_cfI return A0; |
#define | INT_cfI return A0; |
#define | LOGICAL_cfI return C2FLOGICAL(A0); |
#define | LONG_cfI return A0; |
#define | SHORT_cfI return A0; |
#define | STRING_cfI return ; |
#define | VOID_cfI return ; |
#define | FCALLSCSUB0(CN, UN, LN) FCALLSCFUN0(VOID,CN,UN,LN) |
#define | FCALLSCSUB1(CN, UN, LN, T1) FCALLSCFUN1(VOID,CN,UN,LN,T1) |
#define | FCALLSCSUB2(CN, UN, LN, T1, T2) FCALLSCFUN2(VOID,CN,UN,LN,T1,T2) |
#define | FCALLSCSUB3(CN, UN, LN, T1, T2, T3) FCALLSCFUN3(VOID,CN,UN,LN,T1,T2,T3) |
#define | FCALLSCSUB4(CN, UN, LN, T1, T2, T3, T4) FCALLSCFUN4(VOID,CN,UN,LN,T1,T2,T3,T4) |
#define | FCALLSCSUB5(CN, UN, LN, T1, T2, T3, T4, T5) FCALLSCFUN5(VOID,CN,UN,LN,T1,T2,T3,T4,T5) |
#define | FCALLSCSUB6(CN, UN, LN, T1, T2, T3, T4, T5, T6) FCALLSCFUN6(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6) |
#define | FCALLSCSUB7(CN, UN, LN, T1, T2, T3, T4, T5, T6, T7) FCALLSCFUN7(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7) |
#define | FCALLSCSUB8(CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8) FCALLSCFUN8(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8) |
#define | FCALLSCSUB9(CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9) FCALLSCFUN9(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9) |
#define | FCALLSCSUB10(CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA) FCALLSCFUN10(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA) |
#define | FCALLSCSUB11(CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB) FCALLSCFUN11(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB) |
#define | FCALLSCSUB12(CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC) FCALLSCFUN12(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC) |
#define | FCALLSCSUB13(CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD) FCALLSCFUN13(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD) |
#define | FCALLSCSUB14(CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE) FCALLSCFUN14(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE) |
#define | FCALLSCFUN1(T0, CN, UN, LN, T1) FCALLSCFUN5 (T0,CN,UN,LN,T1,CF_0,CF_0,CF_0,CF_0) |
#define | FCALLSCFUN2(T0, CN, UN, LN, T1, T2) FCALLSCFUN5 (T0,CN,UN,LN,T1,T2,CF_0,CF_0,CF_0) |
#define | FCALLSCFUN3(T0, CN, UN, LN, T1, T2, T3) FCALLSCFUN5 (T0,CN,UN,LN,T1,T2,T3,CF_0,CF_0) |
#define | FCALLSCFUN4(T0, CN, UN, LN, T1, T2, T3, T4) FCALLSCFUN5 (T0,CN,UN,LN,T1,T2,T3,T4,CF_0) |
#define | FCALLSCFUN5(T0, CN, UN, LN, T1, T2, T3, T4, T5) FCALLSCFUN10(T0,CN,UN,LN,T1,T2,T3,T4,T5,CF_0,CF_0,CF_0,CF_0,CF_0) |
#define | FCALLSCFUN6(T0, CN, UN, LN, T1, T2, T3, T4, T5, T6) FCALLSCFUN10(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,CF_0,CF_0,CF_0,CF_0) |
#define | FCALLSCFUN7(T0, CN, UN, LN, T1, T2, T3, T4, T5, T6, T7) FCALLSCFUN10(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,CF_0,CF_0,CF_0) |
#define | FCALLSCFUN8(T0, CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8) FCALLSCFUN10(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,CF_0,CF_0) |
#define | FCALLSCFUN9(T0, CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9) FCALLSCFUN10(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,CF_0) |
#define | FCALLSCFUN10(T0, CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA) FCALLSCFUN14(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,CF_0,CF_0,CF_0,CF_0) |
#define | FCALLSCFUN11(T0, CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB) FCALLSCFUN14(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,CF_0,CF_0,CF_0) |
#define | FCALLSCFUN12(T0, CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC) FCALLSCFUN14(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,CF_0,CF_0) |
#define | FCALLSCFUN13(T0, CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD) FCALLSCFUN14(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,CF_0) |
#define | FCALLSCFUN0(T0, CN, UN, LN) |
#define | FCALLSCFUN14(T0, CN, UN, LN, T1, T2, T3, T4, T5, T6, T7, T8, T9, TA, TB, TC, TD, TE) |
Functions | |
static char * | c2fstrv (char *cstr, char *fstr, int elem_len, int sizeofcstr) |
static char * | f2cstrv (char *fstr, char *cstr, int elem_len, int sizeofcstr) |
static char * | kill_trailing (char *s, char t) |
static char * | kill_trailingn (char *s, char t, char *e) |
static char * | vkill_trailing (char *cstr, int elem_len, int sizeofcstr, char t) |
static int | num_elem (char *strv, unsigned elem_len, int term_char, int num_term) |
#define _ | ( | A, | |||
B | ) | _0(A,B) |
Definition at line 39 of file cfortran.h.
#define _0 | ( | A, | |||
B | ) | A##B |
Definition at line 38 of file cfortran.h.
#define _2 | ( | A, | |||
B | ) | A##B |
Definition at line 40 of file cfortran.h.
#define _3 | ( | A, | |||
B, | |||||
C | ) | _(A,_(B,C)) |
Definition at line 41 of file cfortran.h.
#define __SEP_0 | ( | TN, | |||
COMMA | ) |
Definition at line 1182 of file cfortran.h.
#define __SEP_1 | ( | TN, | |||
COMMA | ) | _Icf(2,SEP,TN,COMMA,0) |
Definition at line 1183 of file cfortran.h.
#define _cfleft 1 |
Definition at line 29 of file cfortran.h.
#define _cfleft_cfright 0 |
Definition at line 31 of file cfortran.h.
#define _cfMIN | ( | A, | |||
B | ) | (A<B?A:B) |
Definition at line 307 of file cfortran.h.
#define _cfright |
Definition at line 30 of file cfortran.h.
#define _Icf | ( | N, | |||
T, | |||||
I, | |||||
X, | |||||
Y | ) | _(I,_cfINT)(N,T,I,X,Y,0) |
Definition at line 1237 of file cfortran.h.
#define _Icf4 | ( | N, | |||
T, | |||||
I, | |||||
X, | |||||
Y, | |||||
Z | ) | _(I,_cfINT)(N,T,I,X,Y,Z) |
Definition at line 1238 of file cfortran.h.
#define _NUM_ELEM_ARG -2 |
#define _NUM_ELEMS -1 |
#define _SEP_ | ( | TN, | |||
C, | |||||
COMMA | ) | _(__SEP_,C)(TN,COMMA) |
Definition at line 1181 of file cfortran.h.
#define _Z |
Definition at line 883 of file cfortran.h.
#define AACF | ( | TN, | |||
AI, | |||||
I, | |||||
C | ) | _SEP_(TN,C,COMMA) _Icf(3,AA,TN,AI,_(B,I)) |
Definition at line 714 of file cfortran.h.
#define AATRINGV_cfA | ( | A, | |||
B, | |||||
sA, | |||||
filA, | |||||
silA | ) | (B.s=(char *)malloc((sA)-(filA)),B.fs=c2fstrv(A,B.s,(B.flen=(silA)-1)+1,(sA))); |
Definition at line 690 of file cfortran.h.
#define ABSOFT_cf1 | ( | T0 | ) |
Definition at line 875 of file cfortran.h.
#define ABSOFT_cf2 | ( | T0 | ) |
Definition at line 876 of file cfortran.h.
#define ABSOFT_cf3 | ( | T0 | ) |
Definition at line 877 of file cfortran.h.
#define ACF | ( | NAME, | |||
TN, | |||||
AI, | |||||
I | ) | _(TN,_cfSTR)(4,A,NAME,I,AI,_(B,I),0) |
Definition at line 677 of file cfortran.h.
#define ACOLON ; |
Definition at line 301 of file cfortran.h.
#define ACOMMA , |
Definition at line 300 of file cfortran.h.
#define ANSI_C_preprocessor _cfleft/**/_cfright |
Definition at line 32 of file cfortran.h.
#define APATRINGV_cfA | ( | A, | |||
B, | |||||
sA, | |||||
filA, | |||||
silA | ) | B.fs=c2fstrv(A,A,(B.flen=(silA)-1)+1,B.sizeofA=(sA)); |
Definition at line 692 of file cfortran.h.
Definition at line 191 of file cfortran.h.
#define BCF | ( | TN, | |||
AN, | |||||
C | ) | _SEP_(TN,C,COMMA) _Icf(2,B,TN,AN,0) |
Definition at line 1435 of file cfortran.h.
#define BYTE_cfCCC | ( | A, | |||
B | ) | &A |
Definition at line 1594 of file cfortran.h.
#define BYTE_cfE INTEGER_BYTE A0; |
Definition at line 1365 of file cfortran.h.
#define BYTE_cfF | ( | UN, | |||
LN | ) | BYTE_cfFZ(UN,LN) |
Definition at line 2005 of file cfortran.h.
#define BYTE_cfFZ | ( | UN, | |||
LN | ) | INTEGER_BYTE FCALLSC_QUALIFIER fcallsc(UN,LN)( |
Definition at line 1968 of file cfortran.h.
#define BYTE_cfI return A0; |
Definition at line 2062 of file cfortran.h.
#define BYTE_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1239 of file cfortran.h.
#define BYTE_cfPU | ( | A | ) | CFextern INTEGER_BYTE FCALLSC_QUALIFIER A |
Definition at line 1351 of file cfortran.h.
#define BYTE_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1486 of file cfortran.h.
#define BYTE_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | *A |
Definition at line 1841 of file cfortran.h.
#define BYTE_cfVCF | ( | A, | |||
B | ) |
Definition at line 627 of file cfortran.h.
#define BYTE_cfX return A0; |
Definition at line 1652 of file cfortran.h.
#define BYTEV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1253 of file cfortran.h.
#define BYTEV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1493 of file cfortran.h.
#define BYTEV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1848 of file cfortran.h.
#define BYTEVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1254 of file cfortran.h.
#define BYTEVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1494 of file cfortran.h.
#define BYTEVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1855 of file cfortran.h.
#define BYTEVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1255 of file cfortran.h.
#define BYTEVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1495 of file cfortran.h.
#define BYTEVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1856 of file cfortran.h.
#define BYTEVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1256 of file cfortran.h.
#define BYTEVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1496 of file cfortran.h.
#define BYTEVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1857 of file cfortran.h.
#define BYTEVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1257 of file cfortran.h.
#define BYTEVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1497 of file cfortran.h.
#define BYTEVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1858 of file cfortran.h.
#define BYTEVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1258 of file cfortran.h.
#define BYTEVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1498 of file cfortran.h.
#define BYTEVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1859 of file cfortran.h.
#define BYTEVVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1259 of file cfortran.h.
#define BYTEVVVVVVV_cfPP |
Definition at line 1421 of file cfortran.h.
#define BYTEVVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1499 of file cfortran.h.
#define BYTEVVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1860 of file cfortran.h.
#define BYTEVVVVVVV_cfTYPE INTEGER_BYTE |
Definition at line 1215 of file cfortran.h.
#define C2FCBSTR | ( | CSTR, | |||
FSTR, | |||||
DIM | ) |
Value:
c2fstrv((char *)CSTR, (char *)FSTR, sizeof(FSTR)/cfelementsof(FSTR,DIM)+1, \ sizeof(FSTR)+cfelementsof(FSTR,DIM))
Definition at line 570 of file cfortran.h.
#define C2FLOGICAL | ( | L | ) | (L) |
Definition at line 357 of file cfortran.h.
#define C2FLOGICALV | ( | A, | |||
I | ) |
Definition at line 362 of file cfortran.h.
#define C2FLOGICALV | ( | A, | |||
I | ) | do {int __i; for(__i=0;__i<I;__i++) A[__i]=C2FLOGICAL(A[__i]); } while (FALSE) |
Definition at line 362 of file cfortran.h.
#define C_FUNCTION | ( | UN, | |||
LN | ) | fcallsc(UN,LN) |
Definition at line 193 of file cfortran.h.
#define CCALLSFFUN0 | ( | UN, | |||
LN | ) | CFFUN(UN)() |
Definition at line 1675 of file cfortran.h.
#define CCALLSFFUN1 | ( | UN, | |||
LN, | |||||
T1, | |||||
A1 | ) | CCALLSFFUN5 (UN,LN,T1,CF_0,CF_0,CF_0,CF_0,A1,0,0,0,0) |
Definition at line 1681 of file cfortran.h.
#define CCALLSFFUN10 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA | ) | CCALLSFFUN14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,0,0,0,0) |
Definition at line 1699 of file cfortran.h.
#define CCALLSFFUN11 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB | ) | CCALLSFFUN14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,0,0,0) |
Definition at line 1701 of file cfortran.h.
#define CCALLSFFUN12 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC | ) | CCALLSFFUN14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,0,0) |
Definition at line 1703 of file cfortran.h.
#define CCALLSFFUN13 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD | ) | CCALLSFFUN14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,0) |
Definition at line 1705 of file cfortran.h.
#define CCALLSFFUN14 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD, | |||||
AE | ) |
Value:
((CFFUN(UN)( BCF(T1,A1,0) BCF(T2,A2,1) BCF(T3,A3,1) BCF(T4,A4,1) BCF(T5,A5,1) \ BCF(T6,A6,1) BCF(T7,A7,1) BCF(T8,A8,1) BCF(T9,A9,1) BCF(TA,AA,1) \ BCF(TB,AB,1) BCF(TC,AC,1) BCF(TD,AD,1) BCF(TE,AE,1) \ SCF(T1,LN,1,A1) SCF(T2,LN,2,A2) SCF(T3,LN,3,A3) SCF(T4,LN,4,A4) \ SCF(T5,LN,5,A5) SCF(T6,LN,6,A6) SCF(T7,LN,7,A7) SCF(T8,LN,8,A8) \ SCF(T9,LN,9,A9) SCF(TA,LN,A,AA) SCF(TB,LN,B,AB) SCF(TC,LN,C,AC) \ SCF(TD,LN,D,AD))))
Definition at line 1708 of file cfortran.h.
#define CCALLSFFUN2 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
A1, | |||||
A2 | ) | CCALLSFFUN5 (UN,LN,T1,T2,CF_0,CF_0,CF_0,A1,A2,0,0,0) |
Definition at line 1683 of file cfortran.h.
#define CCALLSFFUN3 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
A1, | |||||
A2, | |||||
A3 | ) | CCALLSFFUN5 (UN,LN,T1,T2,T3,CF_0,CF_0,A1,A2,A3,0,0) |
Definition at line 1685 of file cfortran.h.
#define CCALLSFFUN4 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4 | ) | CCALLSFFUN5 (UN,LN,T1,T2,T3,T4,CF_0,A1,A2,A3,A4,0) |
Definition at line 1687 of file cfortran.h.
#define CCALLSFFUN5 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5 | ) | CCALLSFFUN10(UN,LN,T1,T2,T3,T4,T5,CF_0,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,0,0,0,0,0) |
Definition at line 1689 of file cfortran.h.
#define CCALLSFFUN6 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6 | ) | CCALLSFFUN10(UN,LN,T1,T2,T3,T4,T5,T6,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,0,0,0,0) |
Definition at line 1691 of file cfortran.h.
#define CCALLSFFUN7 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7 | ) | CCALLSFFUN10(UN,LN,T1,T2,T3,T4,T5,T6,T7,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,0,0,0) |
Definition at line 1693 of file cfortran.h.
#define CCALLSFFUN8 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8 | ) | CCALLSFFUN10(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,0,0) |
Definition at line 1695 of file cfortran.h.
#define CCALLSFFUN9 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9 | ) | CCALLSFFUN10(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,0) |
Definition at line 1697 of file cfortran.h.
#define CCALLSFSUB0 | ( | UN, | |||
LN | ) | do{CPPPROTOCLSFSUB0(UN,LN) CFC_(UN,LN)();}while(FALSE) |
Definition at line 1101 of file cfortran.h.
#define CCALLSFSUB1 | ( | UN, | |||
LN, | |||||
T1, | |||||
A1 | ) | CCALLSFSUB5 (UN,LN,T1,CF_0,CF_0,CF_0,CF_0,A1,0,0,0,0) |
Definition at line 1055 of file cfortran.h.
#define CCALLSFSUB10 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA | ) | CCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,0,0,0,0) |
Definition at line 1073 of file cfortran.h.
#define CCALLSFSUB11 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB | ) | CCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,0,0,0) |
Definition at line 1075 of file cfortran.h.
#define CCALLSFSUB12 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC | ) | CCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,0,0) |
Definition at line 1077 of file cfortran.h.
#define CCALLSFSUB13 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD | ) | CCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,0) |
Definition at line 1079 of file cfortran.h.
#define CCALLSFSUB14 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD, | |||||
AE | ) |
Value:
do{VVCF(T1,A1,B1) VVCF(T2,A2,B2) VVCF(T3,A3,B3) VVCF(T4,A4,B4) VVCF(T5,A5,B5) \ VVCF(T6,A6,B6) VVCF(T7,A7,B7) VVCF(T8,A8,B8) VVCF(T9,A9,B9) VVCF(TA,AA,BA) \ VVCF(TB,AB,BB) VVCF(TC,AC,BC) VVCF(TD,AD,BD) VVCF(TE,AE,BE) \ CPPPROTOCLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE) \ ACF(LN,T1,A1,1) ACF(LN,T2,A2,2) ACF(LN,T3,A3,3) \ ACF(LN,T4,A4,4) ACF(LN,T5,A5,5) ACF(LN,T6,A6,6) ACF(LN,T7,A7,7) \ ACF(LN,T8,A8,8) ACF(LN,T9,A9,9) ACF(LN,TA,AA,A) ACF(LN,TB,AB,B) \ ACF(LN,TC,AC,C) ACF(LN,TD,AD,D) ACF(LN,TE,AE,E) \ CFC_(UN,LN)( CFARGTA14(AACF,JCF,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE) );\ WCF(T1,A1,1) WCF(T2,A2,2) WCF(T3,A3,3) WCF(T4,A4,4) WCF(T5,A5,5) \ WCF(T6,A6,6) WCF(T7,A7,7) WCF(T8,A8,8) WCF(T9,A9,9) WCF(TA,AA,A) \ WCF(TB,AB,B) WCF(TC,AC,C) WCF(TD,AD,D) WCF(TE,AE,E) }while(FALSE)
Definition at line 1102 of file cfortran.h.
#define CCALLSFSUB15 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD, | |||||
AE, | |||||
AF | ) | CCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,CF_0,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,0,0,0,0,0) |
Definition at line 1119 of file cfortran.h.
#define CCALLSFSUB16 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD, | |||||
AE, | |||||
AF, | |||||
AG | ) | CCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,AG,0,0,0,0) |
Definition at line 1121 of file cfortran.h.
#define CCALLSFSUB17 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
TH, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD, | |||||
AE, | |||||
AF, | |||||
AG, | |||||
AH | ) | CCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,AG,AH,0,0,0) |
Definition at line 1123 of file cfortran.h.
#define CCALLSFSUB18 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
TH, | |||||
TI, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD, | |||||
AE, | |||||
AF, | |||||
AG, | |||||
AH, | |||||
AI | ) | CCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,AG,AH,AI,0,0) |
Definition at line 1125 of file cfortran.h.
#define CCALLSFSUB19 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
TH, | |||||
TI, | |||||
TJ, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD, | |||||
AE, | |||||
AF, | |||||
AG, | |||||
AH, | |||||
AI, | |||||
AJ | ) | CCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,TJ,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,AG,AH,AI,AJ,0) |
Definition at line 1127 of file cfortran.h.
#define CCALLSFSUB2 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
A1, | |||||
A2 | ) | CCALLSFSUB5 (UN,LN,T1,T2,CF_0,CF_0,CF_0,A1,A2,0,0,0) |
Definition at line 1057 of file cfortran.h.
#define CCALLSFSUB20 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
TH, | |||||
TI, | |||||
TJ, | |||||
TK, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD, | |||||
AE, | |||||
AF, | |||||
AG, | |||||
AH, | |||||
AI, | |||||
AJ, | |||||
AK | ) |
Value:
do{VVCF(T1,A1,B1) VVCF(T2,A2,B2) VVCF(T3,A3,B3) VVCF(T4,A4,B4) VVCF(T5,A5,B5) \ VVCF(T6,A6,B6) VVCF(T7,A7,B7) VVCF(T8,A8,B8) VVCF(T9,A9,B9) VVCF(TA,AA,BA) \ VVCF(TB,AB,BB) VVCF(TC,AC,BC) VVCF(TD,AD,BD) VVCF(TE,AE,BE) VVCF(TF,AF,BF) \ VVCF(TG,AG,BG) VVCF(TH,AH,BH) VVCF(TI,AI,BI) VVCF(TJ,AJ,BJ) VVCF(TK,AK,BK) \ CPPPROTOCLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,TJ,TK) \ ACF(LN,T1,A1,1) ACF(LN,T2,A2,2) ACF(LN,T3,A3,3) ACF(LN,T4,A4,4) \ ACF(LN,T5,A5,5) ACF(LN,T6,A6,6) ACF(LN,T7,A7,7) ACF(LN,T8,A8,8) \ ACF(LN,T9,A9,9) ACF(LN,TA,AA,A) ACF(LN,TB,AB,B) ACF(LN,TC,AC,C) \ ACF(LN,TD,AD,D) ACF(LN,TE,AE,E) ACF(LN,TF,AF,F) ACF(LN,TG,AG,G) \ ACF(LN,TH,AH,H) ACF(LN,TI,AI,I) ACF(LN,TJ,AJ,J) ACF(LN,TK,AK,K) \ CFC_(UN,LN)( CFARGTA20(AACF,JCF,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,TJ,TK,A1,A2,A3,A4,A5,A6,A7,A8,A9,AA,AB,AC,AD,AE,AF,AG,AH,AI,AJ,AK) ); \ WCF(T1,A1,1) WCF(T2,A2,2) WCF(T3,A3,3) WCF(T4,A4,4) WCF(T5,A5,5) WCF(T6,A6,6) \ WCF(T7,A7,7) WCF(T8,A8,8) WCF(T9,A9,9) WCF(TA,AA,A) WCF(TB,AB,B) WCF(TC,AC,C) \ WCF(TD,AD,D) WCF(TE,AE,E) WCF(TF,AF,F) WCF(TG,AG,G) WCF(TH,AH,H) WCF(TI,AI,I) \ WCF(TJ,AJ,J) WCF(TK,AK,K) }while(FALSE)
Definition at line 1137 of file cfortran.h.
#define CCALLSFSUB3 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
A1, | |||||
A2, | |||||
A3 | ) | CCALLSFSUB5 (UN,LN,T1,T2,T3,CF_0,CF_0,A1,A2,A3,0,0) |
Definition at line 1059 of file cfortran.h.
#define CCALLSFSUB4 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4 | ) | CCALLSFSUB5 (UN,LN,T1,T2,T3,T4,CF_0,A1,A2,A3,A4,0) |
Definition at line 1061 of file cfortran.h.
#define CCALLSFSUB5 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5 | ) | CCALLSFSUB10(UN,LN,T1,T2,T3,T4,T5,CF_0,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,0,0,0,0,0) |
Definition at line 1063 of file cfortran.h.
#define CCALLSFSUB6 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6 | ) | CCALLSFSUB10(UN,LN,T1,T2,T3,T4,T5,T6,CF_0,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,0,0,0,0) |
Definition at line 1065 of file cfortran.h.
#define CCALLSFSUB7 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7 | ) | CCALLSFSUB10(UN,LN,T1,T2,T3,T4,T5,T6,T7,CF_0,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,0,0,0) |
Definition at line 1067 of file cfortran.h.
#define CCALLSFSUB8 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8 | ) | CCALLSFSUB10(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,CF_0,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,0,0) |
Definition at line 1069 of file cfortran.h.
#define CCALLSFSUB9 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9 | ) | CCALLSFSUB10(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,CF_0,A1,A2,A3,A4,A5,A6,A7,A8,A9,0) |
Definition at line 1071 of file cfortran.h.
#define CCCF | ( | TN, | |||
I, | |||||
M | ) | _SEP_(TN,M,COMMA) _Icf(3,CC,TN,_(A,I),_(B,I)) |
Definition at line 1614 of file cfortran.h.
#define CCF | ( | NAME, | |||
TN, | |||||
I | ) | _(TN,_cfSTR)(5,C,NAME,I,_(A,I),_(B,I),_(C,I)) |
Definition at line 1563 of file cfortran.h.
#define CF_0_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) |
Definition at line 1320 of file cfortran.h.
#define CF_0_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) |
Definition at line 1560 of file cfortran.h.
#define CF_0_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) |
Definition at line 1941 of file cfortran.h.
#define CF_DECLARE_GETARG |
Definition at line 292 of file cfortran.h.
#define CF_NULL_PROTO |
Definition at line 269 of file cfortran.h.
#define CF_SAME_NAMESPACE |
Definition at line 176 of file cfortran.h.
#define CF_SET_GETARG | ( | ARGC, | |||
ARGV | ) |
Definition at line 293 of file cfortran.h.
#define CFARGS0 | ( | A, | |||
T, | |||||
V, | |||||
W, | |||||
X, | |||||
Y, | |||||
Z | ) | _3(T,_cf,A) |
Definition at line 1230 of file cfortran.h.
#define CFARGS1 | ( | A, | |||
T, | |||||
V, | |||||
W, | |||||
X, | |||||
Y, | |||||
Z | ) | _3(T,_cf,A)(V) |
Definition at line 1231 of file cfortran.h.
#define CFARGS2 | ( | A, | |||
T, | |||||
V, | |||||
W, | |||||
X, | |||||
Y, | |||||
Z | ) | _3(T,_cf,A)(V,W) |
Definition at line 1232 of file cfortran.h.
#define CFARGS3 | ( | A, | |||
T, | |||||
V, | |||||
W, | |||||
X, | |||||
Y, | |||||
Z | ) | _3(T,_cf,A)(V,W,X) |
Definition at line 1233 of file cfortran.h.
#define CFARGS4 | ( | A, | |||
T, | |||||
V, | |||||
W, | |||||
X, | |||||
Y, | |||||
Z | ) | _3(T,_cf,A)(V,W,X,Y) |
Definition at line 1234 of file cfortran.h.
#define CFARGS5 | ( | A, | |||
T, | |||||
V, | |||||
W, | |||||
X, | |||||
Y, | |||||
Z | ) | _3(T,_cf,A)(V,W,X,Y,Z) |
Definition at line 1235 of file cfortran.h.
#define CFARGT14 | ( | F, | |||
S, | |||||
M, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE | ) |
Value:
F(T1,1,0) F(T2,2,1) F(T3,3,1) F(T4,4,1) F(T5,5,1) F(T6,6,1) F(T7,7,1) \ F(T8,8,1) F(T9,9,1) F(TA,A,1) F(TB,B,1) F(TC,C,1) F(TD,D,1) F(TE,E,1) \ M CFARGT14S(S,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE)
Definition at line 907 of file cfortran.h.
#define CFARGT14FS | ( | F, | |||
S, | |||||
M, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE | ) |
Value:
F(T1,1,0) F(T2,2,1) F(T3,3,1) F(T4,4,1) F(T5,5,1) F(T6,6,1) F(T7,7,1) \ F(T8,8,1) F(T9,9,1) F(TA,A,1) F(TB,B,1) F(TC,C,1) F(TD,D,1) F(TE,E,1) \ M CFARGT14S(S,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE)
Definition at line 888 of file cfortran.h.
#define CFARGT14S | ( | S, | |||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE | ) |
Value:
S(T1,1) S(T2,2) S(T3,3) S(T4,4) S(T5,5) S(T6,6) S(T7,7) \ S(T8,8) S(T9,9) S(TA,A) S(TB,B) S(TC,C) S(TD,D) S(TE,E)
Definition at line 885 of file cfortran.h.
#define CFARGT20 | ( | Z, | |||
S, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
TH, | |||||
TI, | |||||
TJ, | |||||
TK | ) |
Value:
Z(T1,1,0) Z(T2,2,1) Z(T3,3,1) Z(T4,4,1) Z(T5,5,1) Z(T6,6,1) Z(T7,7,1) \ Z(T8,8,1) Z(T9,9,1) Z(TA,A,1) Z(TB,B,1) Z(TC,C,1) Z(TD,D,1) Z(TE,E,1) \ Z(TF,F,1) Z(TG,G,1) Z(TH,H,1) Z(TI,I,1) Z(TJ,J,1) Z(TK,K,1) \ S(T1,1) S(T2,2) S(T3,3) S(T4,4) S(T5,5) S(T6,6) S(T7,7) \ S(T8,8) S(T9,9) S(TA,A) S(TB,B) S(TC,C) S(TD,D) S(TE,E) \ S(TF,F) S(TG,G) S(TH,H) S(TI,I) S(TJ,J) S(TK,K)
Definition at line 912 of file cfortran.h.
#define CFARGTA14 | ( | F, | |||
S, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD, | |||||
AE | ) |
Value:
F(T1,A1,1,0) F(T2,A2,2,1) F(T3,A3,3,1) F(T4,A4,4,1) F(T5,A5,5,1) F(T6,A6,6,1) \ F(T7,A7,7,1) F(T8,A8,8,1) F(T9,A9,9,1) F(TA,AA,A,1) F(TB,AB,B,1) F(TC,AC,C,1) \ F(TD,AD,D,1) F(TE,AE,E,1) S(T1,1) S(T2,2) S(T3,3) S(T4,4) \ S(T5,5) S(T6,6) S(T7,7) S(T8,8) S(T9,9) S(TA,A) \ S(TB,B) S(TC,C) S(TD,D) S(TE,E)
Definition at line 919 of file cfortran.h.
#define CFARGTA20 | ( | Z, | |||
S, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
TH, | |||||
TI, | |||||
TJ, | |||||
TK, | |||||
A1, | |||||
A2, | |||||
A3, | |||||
A4, | |||||
A5, | |||||
A6, | |||||
A7, | |||||
A8, | |||||
A9, | |||||
AA, | |||||
AB, | |||||
AC, | |||||
AD, | |||||
AE, | |||||
AF, | |||||
AG, | |||||
AH, | |||||
AI, | |||||
AJ, | |||||
AK | ) |
Value:
Z(T1,A1,1,0) Z(T2,A2,2,1) Z(T3,A3,3,1) Z(T4,A4,4,1) Z(T5,A5,5,1) Z(T6,A6,6,1) \ Z(T7,A7,7,1) Z(T8,A8,8,1) Z(T9,A9,9,1) Z(TA,AA,A,1) Z(TB,AB,B,1) Z(TC,AC,C,1) \ Z(TD,AD,D,1) Z(TE,AE,E,1) Z(TF,AF,F,1) Z(TG,AG,G,1) Z(TH,AH,H,1) Z(TI,AI,I,1) \ Z(TJ,AJ,J,1) Z(TK,AK,K,1) S(T1,1) S(T2,2) S(T3,3) S(T4,4) \ S(T5,5) S(T6,6) S(T7,7) S(T8,8) S(T9,9) S(TA,A) \ S(TB,B) S(TC,C) S(TD,D) S(TE,E) S(TF,F) S(TG,G) \ S(TH,H) S(TI,I) S(TJ,J) S(TK,K)
Definition at line 927 of file cfortran.h.
#define CFC_ | ( | UN, | |||
LN | ) | LN |
Definition at line 183 of file cfortran.h.
#define cfDEREFERENCE0 |
Definition at line 582 of file cfortran.h.
#define cfDEREFERENCE1 * |
Definition at line 583 of file cfortran.h.
#define cfDEREFERENCE2 ** |
Definition at line 584 of file cfortran.h.
#define cfDEREFERENCE3 *** |
Definition at line 585 of file cfortran.h.
#define cfDEREFERENCE4 **** |
Definition at line 586 of file cfortran.h.
#define cfDEREFERENCE5 ***** |
Definition at line 587 of file cfortran.h.
#define cfelementsof | ( | A, | |||
D | ) | (sizeof(A)/sizeof(_(cfDEREFERENCE,D)(A))) |
Definition at line 588 of file cfortran.h.
#define CFextern extern |
Definition at line 1020 of file cfortran.h.
#define CFFUN | ( | NAME | ) | _(__cf__,NAME) |
Definition at line 1672 of file cfortran.h.
#define CFORTRAN_NON_CHAR 0x7F |
Definition at line 1175 of file cfortran.h.
#define COMMON_BLOCK | ( | UN, | |||
LN | ) | CFC_(UN,LN) |
Definition at line 200 of file cfortran.h.
#define COMMON_BLOCK_DEF | ( | DEFINITION, | |||
NAME | ) | extern DEFINITION NAME |
Definition at line 268 of file cfortran.h.
#define CPPPROTOCLSFSUB0 | ( | UN, | |||
LN | ) | PROTOCCALLSFSUB0(UN,LN) |
Definition at line 1087 of file cfortran.h.
#define CPPPROTOCLSFSUB14 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE) |
Definition at line 1089 of file cfortran.h.
#define CPPPROTOCLSFSUB20 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
TH, | |||||
TI, | |||||
TJ, | |||||
TK | ) | PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,TJ,TK) |
Definition at line 1091 of file cfortran.h.
#define DCF | ( | TN, | |||
I | ) | HCF(TN,I) |
Definition at line 1803 of file cfortran.h.
#define DDCF | ( | TN, | |||
I | ) | HHCF(TN,I) |
Definition at line 1804 of file cfortran.h.
#define DDDCF | ( | TN, | |||
I | ) | HHHCF(TN,I) |
Definition at line 1805 of file cfortran.h.
#define DEFAULT_cfA | ( | M, | |||
I, | |||||
A, | |||||
B | ) |
Definition at line 678 of file cfortran.h.
#define DEFAULT_cfC | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
C | ) |
Definition at line 1564 of file cfortran.h.
#define DEFAULT_cfH | ( | M, | |||
I, | |||||
A | ) |
Definition at line 1471 of file cfortran.h.
#define DEFAULT_cfJ | ( | B | ) |
Definition at line 753 of file cfortran.h.
#define DEFAULT_cfKK | ( | B | ) |
Definition at line 769 of file cfortran.h.
#define DEFAULT_cfQ | ( | B | ) |
Definition at line 1809 of file cfortran.h.
#define DEFAULT_cfR | ( | A, | |||
B, | |||||
D | ) |
Definition at line 1944 of file cfortran.h.
#define DEFAULT_cfS | ( | M, | |||
I, | |||||
A | ) |
Definition at line 1455 of file cfortran.h.
#define DEFAULT_cfW | ( | A, | |||
B | ) |
Definition at line 782 of file cfortran.h.
#define DOUBLE_cfCCC | ( | A, | |||
B | ) | &A |
Definition at line 1595 of file cfortran.h.
#define DOUBLE_cfE DOUBLE_PRECISION A0; |
Definition at line 1366 of file cfortran.h.
#define DOUBLE_cfF | ( | UN, | |||
LN | ) | DOUBLE_cfFZ(UN,LN) |
Definition at line 2006 of file cfortran.h.
#define DOUBLE_cfFZ | ( | UN, | |||
LN | ) | DOUBLE_PRECISION FCALLSC_QUALIFIER fcallsc(UN,LN)( |
Definition at line 1969 of file cfortran.h.
#define DOUBLE_cfI return A0; |
Definition at line 2063 of file cfortran.h.
#define DOUBLE_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | _(CFARGS,N)(A,INT,B,X,Y,Z,0) |
Definition at line 1240 of file cfortran.h.
#define DOUBLE_cfPU | ( | A | ) | CFextern DOUBLE_PRECISION FCALLSC_QUALIFIER A |
Definition at line 1352 of file cfortran.h.
#define DOUBLE_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1487 of file cfortran.h.
#define DOUBLE_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | *A |
Definition at line 1842 of file cfortran.h.
#define DOUBLE_cfVCF | ( | A, | |||
B | ) |
Definition at line 628 of file cfortran.h.
#define DOUBLE_cfX return A0; |
Definition at line 1653 of file cfortran.h.
#define DOUBLE_PRECISION double |
Definition at line 216 of file cfortran.h.
#define DOUBLEV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | _(CFARGS,N)(A,INTV,B,X,Y,Z,0) |
Definition at line 1260 of file cfortran.h.
#define DOUBLEV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1500 of file cfortran.h.
#define DOUBLEV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1849 of file cfortran.h.
#define DOUBLEVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | _(CFARGS,N)(A,INTVV,B,X,Y,Z,0) |
Definition at line 1261 of file cfortran.h.
#define DOUBLEVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1501 of file cfortran.h.
#define DOUBLEVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1861 of file cfortran.h.
#define DOUBLEVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | _(CFARGS,N)(A,INTVVV,B,X,Y,Z,0) |
Definition at line 1262 of file cfortran.h.
#define DOUBLEVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1502 of file cfortran.h.
#define DOUBLEVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1862 of file cfortran.h.
#define DOUBLEVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | _(CFARGS,N)(A,INTVVVV,B,X,Y,Z,0) |
Definition at line 1263 of file cfortran.h.
#define DOUBLEVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1503 of file cfortran.h.
#define DOUBLEVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1863 of file cfortran.h.
#define DOUBLEVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | _(CFARGS,N)(A,INTVVVVV,B,X,Y,Z,0) |
Definition at line 1264 of file cfortran.h.
#define DOUBLEVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1504 of file cfortran.h.
#define DOUBLEVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1864 of file cfortran.h.
#define DOUBLEVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | _(CFARGS,N)(A,INTVVVVVV,B,X,Y,Z,0) |
Definition at line 1265 of file cfortran.h.
#define DOUBLEVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1505 of file cfortran.h.
#define DOUBLEVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1865 of file cfortran.h.
#define DOUBLEVVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | _(CFARGS,N)(A,INTVVVVVVV,B,X,Y,Z,0) |
Definition at line 1266 of file cfortran.h.
#define DOUBLEVVVVVVV_cfPP |
Definition at line 1423 of file cfortran.h.
#define DOUBLEVVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1506 of file cfortran.h.
#define DOUBLEVVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1866 of file cfortran.h.
#define DOUBLEVVVVVVV_cfTYPE DOUBLE_PRECISION |
Definition at line 1216 of file cfortran.h.
#define F2CLOGICAL | ( | L | ) | (L) |
Definition at line 358 of file cfortran.h.
#define F2CLOGICALV | ( | A, | |||
I | ) |
Definition at line 363 of file cfortran.h.
#define F2CLOGICALV | ( | A, | |||
I | ) | do {int __i; for(__i=0;__i<I;__i++) A[__i]=F2CLOGICAL(A[__i]); } while (FALSE) |
Definition at line 363 of file cfortran.h.
#define FALSE (1==0) |
Definition at line 309 of file cfortran.h.
Referenced by add_event(), al_check(), analyze_run(), ascii_write(), bm_check_buffers(), bm_close_buffer(), bm_open_buffer(), bm_receive_event(), bm_remove_event_request(), bm_wait_for_free_space(), book_ntuples(), bor(), check_abort(), check_polled_events(), check_web_password(), close_channels(), cm_check_deferred_transition(), cm_deregister_transition(), cm_disconnect_experiment(), cm_msg(), cm_msg1(), cm_set_client_info(), cm_transition1(), cm_yield(), cmd_edit(), cmd_idle(), command_loop(), condition_test(), db_check_record(), db_close_database(), db_copy(), db_create_record(), db_delete_key1(), db_get_event_definition(), db_get_record(), db_open_database(), db_paste(), dm_buffer_create(), do_jrpc_rev0(), DoExtension(), dump_write(), eb_mfragment_add(), el_submit(), equal_ustring(), evaluate_src(), export_hist(), find_odb_tag(), ftp_command(), ftp_good(), gdImageCreateFromGif(), generate_hist_graph(), get_elog_url(), GetCode(), MidasHistory::GetTagsFromEquipment(), MidasHistory::hs_connect(), initialize_equipment(), interprete(), is_editable(), isparam(), lazy_condition_check(), lazy_copy(), lazy_file_exists(), lazy_main(), lazy_maintain_check(), lazy_maintain_free_space(), lazy_settings_hotlink(), load_parameters(), log_system_history(), log_write(), logger_init(), logger_root(), LWZReadByte(), main(), manual_trigger(), md_event_swap(), md_file_ropen(), odb_load(), odb_save(), open_history(), poll_event(), process_event(), read_state(), ReadColorMap(), ReadImage(), readout_thread(), register_equipment(), scheduler(), send_all_periodic_events(), server_loop(), show_cnaf_page(), show_custom_gif(), show_custom_page(), show_delete_page(), show_elog_delete(), show_elog_page(), show_elog_submit_query(), show_hist_page(), show_messages_page(), show_programs_page(), show_status_page(), source_scan(), ss_thread_kill(), start_the_run(), stop_the_run(), test_clear(), test_increment(), test_register(), tr_pause(), tr_start(), tr_start_abort(), tr_start_fal(), tr_stop(), write_event_ascii(), write_event_hbook(), and write_event_midas().
#define fcallsc | ( | UN, | |||
LN | ) | orig_fcallsc(UN,LN) |
Definition at line 189 of file cfortran.h.
#define FCALLSC_QUALIFIER |
Definition at line 1013 of file cfortran.h.
#define FCALLSCFUN0 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN | ) |
Value:
CFextern _(T0,_cfFZ)(UN,LN) ABSOFT_cf2(T0)) \ {_Icf(2,UU,T0,A0,0); _Icf(0,L,T0,0,0) CN(); _Icf(0,K,T0,0,0) _(T0,_cfI)}
Definition at line 2140 of file cfortran.h.
#define FCALLSCFUN1 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1 | ) | FCALLSCFUN5 (T0,CN,UN,LN,T1,CF_0,CF_0,CF_0,CF_0) |
Definition at line 2112 of file cfortran.h.
#define FCALLSCFUN10 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA | ) | FCALLSCFUN14(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,CF_0,CF_0,CF_0,CF_0) |
Definition at line 2130 of file cfortran.h.
#define FCALLSCFUN11 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB | ) | FCALLSCFUN14(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,CF_0,CF_0,CF_0) |
Definition at line 2132 of file cfortran.h.
#define FCALLSCFUN12 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC | ) | FCALLSCFUN14(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,CF_0,CF_0) |
Definition at line 2134 of file cfortran.h.
#define FCALLSCFUN13 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD | ) | FCALLSCFUN14(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,CF_0) |
Definition at line 2136 of file cfortran.h.
#define FCALLSCFUN14 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE | ) |
Value:
CFextern _(T0,_cfF)(UN,LN) \ CFARGT14(NCF,DCF,ABSOFT_cf2(T0),T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE)) \ { CFARGT14S(QCF,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE) \ _Icf(2,UU,T0,A0,0); _Icf(0,L,T0,0,0) CN( TCF(LN,T1,1,0) TCF(LN,T2,2,1) \ TCF(LN,T3,3,1) TCF(LN,T4,4,1) TCF(LN,T5,5,1) TCF(LN,T6,6,1) TCF(LN,T7,7,1) \ TCF(LN,T8,8,1) TCF(LN,T9,9,1) TCF(LN,TA,A,1) TCF(LN,TB,B,1) TCF(LN,TC,C,1) \ TCF(LN,TD,D,1) TCF(LN,TE,E,1) ); _Icf(0,K,T0,0,0) \ CFARGT14S(RCF,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE) _(T0,_cfI) }
Definition at line 2143 of file cfortran.h.
#define FCALLSCFUN2 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2 | ) | FCALLSCFUN5 (T0,CN,UN,LN,T1,T2,CF_0,CF_0,CF_0) |
Definition at line 2114 of file cfortran.h.
#define FCALLSCFUN3 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3 | ) | FCALLSCFUN5 (T0,CN,UN,LN,T1,T2,T3,CF_0,CF_0) |
Definition at line 2116 of file cfortran.h.
#define FCALLSCFUN4 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4 | ) | FCALLSCFUN5 (T0,CN,UN,LN,T1,T2,T3,T4,CF_0) |
Definition at line 2118 of file cfortran.h.
#define FCALLSCFUN5 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5 | ) | FCALLSCFUN10(T0,CN,UN,LN,T1,T2,T3,T4,T5,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 2120 of file cfortran.h.
#define FCALLSCFUN6 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6 | ) | FCALLSCFUN10(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,CF_0,CF_0,CF_0,CF_0) |
Definition at line 2122 of file cfortran.h.
#define FCALLSCFUN7 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7 | ) | FCALLSCFUN10(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,CF_0,CF_0,CF_0) |
Definition at line 2124 of file cfortran.h.
#define FCALLSCFUN8 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8 | ) | FCALLSCFUN10(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,CF_0,CF_0) |
Definition at line 2126 of file cfortran.h.
#define FCALLSCFUN9 | ( | T0, | |||
CN, | |||||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9 | ) | FCALLSCFUN10(T0,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,CF_0) |
Definition at line 2128 of file cfortran.h.
#define FCALLSCSUB0 | ( | CN, | |||
UN, | |||||
LN | ) | FCALLSCFUN0(VOID,CN,UN,LN) |
Definition at line 2085 of file cfortran.h.
#define FCALLSCSUB1 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1 | ) | FCALLSCFUN1(VOID,CN,UN,LN,T1) |
Definition at line 2086 of file cfortran.h.
#define FCALLSCSUB10 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA | ) | FCALLSCFUN10(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA) |
Definition at line 2101 of file cfortran.h.
#define FCALLSCSUB11 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB | ) | FCALLSCFUN11(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB) |
Definition at line 2103 of file cfortran.h.
#define FCALLSCSUB12 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC | ) | FCALLSCFUN12(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC) |
Definition at line 2105 of file cfortran.h.
#define FCALLSCSUB13 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD | ) | FCALLSCFUN13(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD) |
Definition at line 2107 of file cfortran.h.
#define FCALLSCSUB14 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE | ) | FCALLSCFUN14(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE) |
Definition at line 2109 of file cfortran.h.
#define FCALLSCSUB2 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2 | ) | FCALLSCFUN2(VOID,CN,UN,LN,T1,T2) |
Definition at line 2087 of file cfortran.h.
#define FCALLSCSUB3 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3 | ) | FCALLSCFUN3(VOID,CN,UN,LN,T1,T2,T3) |
Definition at line 2088 of file cfortran.h.
#define FCALLSCSUB4 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4 | ) | FCALLSCFUN4(VOID,CN,UN,LN,T1,T2,T3,T4) |
Definition at line 2089 of file cfortran.h.
#define FCALLSCSUB5 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5 | ) | FCALLSCFUN5(VOID,CN,UN,LN,T1,T2,T3,T4,T5) |
Definition at line 2091 of file cfortran.h.
#define FCALLSCSUB6 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6 | ) | FCALLSCFUN6(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6) |
Definition at line 2093 of file cfortran.h.
#define FCALLSCSUB7 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7 | ) | FCALLSCFUN7(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7) |
Definition at line 2095 of file cfortran.h.
#define FCALLSCSUB8 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8 | ) | FCALLSCFUN8(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8) |
Definition at line 2097 of file cfortran.h.
#define FCALLSCSUB9 | ( | CN, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9 | ) | FCALLSCFUN9(VOID,CN,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9) |
Definition at line 2099 of file cfortran.h.
#define FCB2CSTR | ( | FSTR, | |||
CSTR, | |||||
DIM | ) |
Value:
vkill_trailing(f2cstrv((char *)FSTR, (char *)CSTR, \ sizeof(FSTR)/cfelementsof(FSTR,DIM)+1, \ sizeof(FSTR)+cfelementsof(FSTR,DIM)), \ sizeof(FSTR)/cfelementsof(FSTR,DIM)+1, \ sizeof(FSTR)+cfelementsof(FSTR,DIM), ' ')
Definition at line 575 of file cfortran.h.
#define firstindexlength | ( | A | ) | (sizeof(A[0])==1 ? 1 : (sizeof(A) / sizeof(A[0])) ) |
Definition at line 316 of file cfortran.h.
#define FLOAT_cfCCC | ( | A, | |||
B | ) | &A |
Definition at line 1597 of file cfortran.h.
#define FLOAT_cfE FORTRAN_REAL A0; |
Definition at line 1368 of file cfortran.h.
#define FLOAT_cfF | ( | UN, | |||
LN | ) | FORTRAN_REAL FCALLSC_QUALIFIER fcallsc(UN,LN)( |
Definition at line 2008 of file cfortran.h.
#define FLOAT_cfFZ | ( | UN, | |||
LN | ) | FORTRAN_REAL FCALLSC_QUALIFIER fcallsc(UN,LN)(void |
Definition at line 1978 of file cfortran.h.
#define FLOAT_cfI return A0; |
Definition at line 2065 of file cfortran.h.
#define FLOAT_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1241 of file cfortran.h.
#define FLOAT_cfPU | ( | A | ) | CFextern FORTRAN_REAL FCALLSC_QUALIFIER A |
Definition at line 1354 of file cfortran.h.
#define FLOAT_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1488 of file cfortran.h.
#define FLOAT_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | *A |
Definition at line 1843 of file cfortran.h.
#define FLOAT_cfVCF | ( | A, | |||
B | ) |
Definition at line 630 of file cfortran.h.
#define FLOAT_cfX return A0; |
Definition at line 1655 of file cfortran.h.
#define FLOATV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1267 of file cfortran.h.
#define FLOATV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1507 of file cfortran.h.
#define FLOATV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | VOIDP A |
Definition at line 1850 of file cfortran.h.
#define FLOATVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1268 of file cfortran.h.
#define FLOATVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1508 of file cfortran.h.
#define FLOATVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1867 of file cfortran.h.
#define FLOATVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1269 of file cfortran.h.
#define FLOATVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1509 of file cfortran.h.
#define FLOATVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1868 of file cfortran.h.
#define FLOATVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1270 of file cfortran.h.
#define FLOATVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1510 of file cfortran.h.
#define FLOATVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1869 of file cfortran.h.
#define FLOATVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1271 of file cfortran.h.
#define FLOATVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1511 of file cfortran.h.
#define FLOATVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1870 of file cfortran.h.
#define FLOATVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1272 of file cfortran.h.
#define FLOATVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1512 of file cfortran.h.
#define FLOATVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1871 of file cfortran.h.
#define FLOATVVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1273 of file cfortran.h.
#define FLOATVVVVVVV_cfPP |
Definition at line 239 of file cfortran.h.
#define FLOATVVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1513 of file cfortran.h.
#define FLOATVVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1872 of file cfortran.h.
#define FLOATVVVVVVV_cfTYPE FORTRAN_REAL |
Definition at line 1217 of file cfortran.h.
#define FORTRAN_FUNCTION | ( | UN, | |||
LN | ) | CFC_(UN,LN) |
Definition at line 194 of file cfortran.h.
#define FORTRAN_REAL float |
Definition at line 224 of file cfortran.h.
#define H_CF_SPECIAL unsigned |
Definition at line 1469 of file cfortran.h.
#define HCF | ( | TN, | |||
I | ) | _(TN,_cfSTR)(3,H,COMMA, H,_(C,I),0,0) |
Definition at line 1466 of file cfortran.h.
#define HH_CF_SPECIAL |
Definition at line 1470 of file cfortran.h.
#define HHCF | ( | TN, | |||
I | ) | _(TN,_cfSTR)(3,H,COMMA,HH,_(C,I),0,0) |
Definition at line 1467 of file cfortran.h.
#define HHHCF | ( | TN, | |||
I | ) | _(TN,_cfSTR)(3,H,COLON, H,_(C,I),0,0) |
Definition at line 1468 of file cfortran.h.
#define INT_cfAA | ( | T, | |||
A, | |||||
B | ) | &B |
Definition at line 715 of file cfortran.h.
#define INT_cfB | ( | T, | |||
A | ) | (_(T,VVVVVVV_cfTYPE)) A |
Definition at line 1436 of file cfortran.h.
#define INT_cfCC | ( | T, | |||
A, | |||||
B | ) | _(T,_cfCCC)(A,B) |
Definition at line 1615 of file cfortran.h.
#define INT_cfCCC | ( | A, | |||
B | ) | &A |
Definition at line 1602 of file cfortran.h.
#define INT_cfE int A0; |
Definition at line 1372 of file cfortran.h.
#define INT_cfF | ( | UN, | |||
LN | ) | INT_cfFZ(UN,LN) |
Definition at line 2012 of file cfortran.h.
#define INT_cfFF |
Definition at line 2019 of file cfortran.h.
#define INT_cfFZ | ( | UN, | |||
LN | ) | int FCALLSC_QUALIFIER fcallsc(UN,LN)( |
Definition at line 1970 of file cfortran.h.
#define INT_cfG | ( | T, | |||
UN, | |||||
LN | ) | INT_cfGZ(T,UN,LN) |
Definition at line 1417 of file cfortran.h.
#define INT_cfGZ | ( | T, | |||
UN, | |||||
LN | ) | A0=CFC_(UN,LN)( |
Definition at line 1405 of file cfortran.h.
#define INT_cfI return A0; |
Definition at line 2069 of file cfortran.h.
#define INT_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1242 of file cfortran.h.
#define INT_cfK |
Definition at line 2035 of file cfortran.h.
#define INT_cfL A0= |
Definition at line 2031 of file cfortran.h.
#define INT_cfN | ( | T, | |||
A | ) | _(T,VVVVVVV_cfTYPE) * A |
Definition at line 804 of file cfortran.h.
#define INT_cfPU | ( | A | ) | CFextern int FCALLSC_QUALIFIER A |
Definition at line 1358 of file cfortran.h.
#define INT_cfSEP | ( | T, | |||
B | ) | _(A,B) |
Definition at line 1184 of file cfortran.h.
#define INT_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1489 of file cfortran.h.
#define INT_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | *A |
Definition at line 1844 of file cfortran.h.
#define INT_cfU | ( | T, | |||
A | ) | _(T,VVVVVVV_cfTYPE) A |
Definition at line 1326 of file cfortran.h.
#define INT_cfUU | ( | T, | |||
A | ) | _(T,VVVVVVV_cfTYPE) A |
Definition at line 1346 of file cfortran.h.
#define INT_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) | _(VCF_INT_,F)(T,A,B) |
Definition at line 641 of file cfortran.h.
#define INT_cfVCF | ( | A, | |||
B | ) |
Definition at line 634 of file cfortran.h.
#define INT_cfX return A0; |
Definition at line 1659 of file cfortran.h.
#define INTEGER_BYTE signed char |
Definition at line 1210 of file cfortran.h.
#define INTV_cfAA | ( | T, | |||
A, | |||||
B | ) | _(T,VVVVVV_cfPP) A |
Definition at line 716 of file cfortran.h.
#define INTV_cfB | ( | T, | |||
A | ) | A |
Definition at line 1437 of file cfortran.h.
#define INTV_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1616 of file cfortran.h.
#define INTV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1274 of file cfortran.h.
#define INTV_cfN | ( | T, | |||
A | ) | _(T,VVVVVV_cfTYPE) * A |
Definition at line 805 of file cfortran.h.
#define INTV_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1185 of file cfortran.h.
#define INTV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1514 of file cfortran.h.
#define INTV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1851 of file cfortran.h.
#define INTV_cfU | ( | T, | |||
A | ) | _(T,VVVVVV_cfTYPE) * A |
Definition at line 1327 of file cfortran.h.
#define INTV_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) |
Definition at line 642 of file cfortran.h.
#define INTVV_cfAA | ( | T, | |||
A, | |||||
B | ) | _(T,VVVVV_cfPP) A[0] |
Definition at line 717 of file cfortran.h.
#define INTVV_cfB | ( | T, | |||
A | ) | (A)[0] |
Definition at line 1438 of file cfortran.h.
#define INTVV_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1617 of file cfortran.h.
#define INTVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1275 of file cfortran.h.
#define INTVV_cfN | ( | T, | |||
A | ) | _(T,VVVVV_cfTYPE) * A |
Definition at line 806 of file cfortran.h.
#define INTVV_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1186 of file cfortran.h.
#define INTVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1515 of file cfortran.h.
#define INTVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1873 of file cfortran.h.
#define INTVV_cfU | ( | T, | |||
A | ) | _(T,VVVVV_cfTYPE) * A |
Definition at line 1328 of file cfortran.h.
#define INTVV_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) |
Definition at line 643 of file cfortran.h.
#define INTVVV_cfAA | ( | T, | |||
A, | |||||
B | ) | _(T,VVVV_cfPP) A[0][0] |
Definition at line 718 of file cfortran.h.
#define INTVVV_cfB | ( | T, | |||
A | ) | (A)[0][0] |
Definition at line 1439 of file cfortran.h.
#define INTVVV_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1618 of file cfortran.h.
#define INTVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1276 of file cfortran.h.
#define INTVVV_cfN | ( | T, | |||
A | ) | _(T,VVVV_cfTYPE) * A |
Definition at line 807 of file cfortran.h.
#define INTVVV_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1187 of file cfortran.h.
#define INTVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1516 of file cfortran.h.
#define INTVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1874 of file cfortran.h.
#define INTVVV_cfU | ( | T, | |||
A | ) | _(T,VVVV_cfTYPE) * A |
Definition at line 1329 of file cfortran.h.
#define INTVVV_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) |
Definition at line 644 of file cfortran.h.
#define INTVVVV_cfAA | ( | T, | |||
A, | |||||
B | ) | _(T,VVV_cfPP) A[0][0][0] |
Definition at line 719 of file cfortran.h.
#define INTVVVV_cfB | ( | T, | |||
A | ) | (A)[0][0][0] |
Definition at line 1440 of file cfortran.h.
#define INTVVVV_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1619 of file cfortran.h.
#define INTVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1277 of file cfortran.h.
#define INTVVVV_cfN | ( | T, | |||
A | ) | _(T,VVV_cfTYPE) * A |
Definition at line 808 of file cfortran.h.
#define INTVVVV_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1188 of file cfortran.h.
#define INTVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1517 of file cfortran.h.
#define INTVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1875 of file cfortran.h.
#define INTVVVV_cfU | ( | T, | |||
A | ) | _(T,VVV_cfTYPE) * A |
Definition at line 1330 of file cfortran.h.
#define INTVVVV_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) |
Definition at line 645 of file cfortran.h.
#define INTVVVVV_cfAA | ( | T, | |||
A, | |||||
B | ) | _(T,VV_cfPP) A[0][0][0][0] |
Definition at line 720 of file cfortran.h.
#define INTVVVVV_cfB | ( | T, | |||
A | ) | (A)[0][0][0][0] |
Definition at line 1441 of file cfortran.h.
#define INTVVVVV_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1620 of file cfortran.h.
#define INTVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1278 of file cfortran.h.
#define INTVVVVV_cfN | ( | T, | |||
A | ) | _(T,VV_cfTYPE) * A |
Definition at line 809 of file cfortran.h.
#define INTVVVVV_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1189 of file cfortran.h.
#define INTVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1518 of file cfortran.h.
#define INTVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1876 of file cfortran.h.
#define INTVVVVV_cfU | ( | T, | |||
A | ) | _(T,VV_cfTYPE) * A |
Definition at line 1331 of file cfortran.h.
#define INTVVVVV_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) |
Definition at line 646 of file cfortran.h.
#define INTVVVVVV_cfAA | ( | T, | |||
A, | |||||
B | ) | _(T,V_cfPP) A[0][0][0][0][0] |
Definition at line 721 of file cfortran.h.
#define INTVVVVVV_cfB | ( | T, | |||
A | ) | (A)[0][0][0][0][0] |
Definition at line 1442 of file cfortran.h.
#define INTVVVVVV_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1621 of file cfortran.h.
#define INTVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1279 of file cfortran.h.
#define INTVVVVVV_cfN | ( | T, | |||
A | ) | _(T,V_cfTYPE) * A |
Definition at line 810 of file cfortran.h.
#define INTVVVVVV_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1190 of file cfortran.h.
#define INTVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1519 of file cfortran.h.
#define INTVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1877 of file cfortran.h.
#define INTVVVVVV_cfU | ( | T, | |||
A | ) | _(T,V_cfTYPE) * A |
Definition at line 1332 of file cfortran.h.
#define INTVVVVVV_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) |
Definition at line 647 of file cfortran.h.
#define INTVVVVVVV_cfAA | ( | T, | |||
A, | |||||
B | ) | _(T,_cfPP) A[0][0][0][0][0][0] |
Definition at line 722 of file cfortran.h.
#define INTVVVVVVV_cfB | ( | T, | |||
A | ) | (A)[0][0][0][0][0][0] |
Definition at line 1443 of file cfortran.h.
#define INTVVVVVVV_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1622 of file cfortran.h.
#define INTVVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1280 of file cfortran.h.
#define INTVVVVVVV_cfN | ( | T, | |||
A | ) | _(T,_cfTYPE) * A |
Definition at line 811 of file cfortran.h.
#define INTVVVVVVV_cfPP |
Definition at line 1422 of file cfortran.h.
#define INTVVVVVVV_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1191 of file cfortran.h.
#define INTVVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1520 of file cfortran.h.
#define INTVVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1878 of file cfortran.h.
#define INTVVVVVVV_cfTYPE int |
Definition at line 1218 of file cfortran.h.
#define INTVVVVVVV_cfU | ( | T, | |||
A | ) | _(T,_cfTYPE) * A |
Definition at line 1333 of file cfortran.h.
#define INTVVVVVVV_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) |
Definition at line 648 of file cfortran.h.
#define JCF | ( | TN, | |||
I | ) | _(TN,_cfSTR)(1,J,_(B,I), 0,0,0,0) |
Definition at line 749 of file cfortran.h.
#define KCF | ( | TN, | |||
I | ) | _(TN,_cfSTR)(1,KK,_(B,I), 0,0,0,0) |
Definition at line 765 of file cfortran.h.
#define LOGICAL_cfA | ( | M, | |||
I, | |||||
A, | |||||
B | ) | B=C2FLOGICAL(B); |
Definition at line 679 of file cfortran.h.
#define LOGICAL_cfC | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
C | ) | A=C2FLOGICAL( A); |
Definition at line 1565 of file cfortran.h.
#define LOGICAL_cfCCC | ( | A, | |||
B | ) | &A |
Definition at line 1603 of file cfortran.h.
#define LOGICAL_cfE int A0; |
Definition at line 1373 of file cfortran.h.
#define LOGICAL_cfF | ( | UN, | |||
LN | ) | LOGICAL_cfFZ(UN,LN) |
Definition at line 2013 of file cfortran.h.
#define LOGICAL_cfFZ | ( | UN, | |||
LN | ) | int FCALLSC_QUALIFIER fcallsc(UN,LN)( |
Definition at line 1971 of file cfortran.h.
#define LOGICAL_cfH | ( | S, | |||
U, | |||||
B | ) |
Definition at line 1472 of file cfortran.h.
#define LOGICAL_cfI return C2FLOGICAL(A0); |
Definition at line 2074 of file cfortran.h.
#define LOGICAL_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1243 of file cfortran.h.
#define LOGICAL_cfJ | ( | B | ) | DEFAULT_cfJ(B) |
Definition at line 755 of file cfortran.h.
#define LOGICAL_cfKK | ( | B | ) | DEFAULT_cfKK(B) |
Definition at line 771 of file cfortran.h.
#define LOGICAL_cfPU | ( | A | ) | CFextern int FCALLSC_QUALIFIER A |
Definition at line 1359 of file cfortran.h.
#define LOGICAL_cfQ | ( | B | ) |
Definition at line 1810 of file cfortran.h.
#define LOGICAL_cfR | ( | A, | |||
B, | |||||
D | ) |
Definition at line 1945 of file cfortran.h.
#define LOGICAL_cfS | ( | M, | |||
I, | |||||
A | ) |
Definition at line 1456 of file cfortran.h.
#define LOGICAL_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,LOGICAL,A,B,C,D,E) |
Definition at line 1490 of file cfortran.h.
#define LOGICAL_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | F2CLOGICAL(*A) |
Definition at line 1845 of file cfortran.h.
#define LOGICAL_cfVCF | ( | A, | |||
B | ) |
Definition at line 635 of file cfortran.h.
#define LOGICAL_cfW | ( | A, | |||
B | ) |
Definition at line 783 of file cfortran.h.
#define LOGICAL_cfX return F2CLOGICAL(A0); |
Definition at line 1660 of file cfortran.h.
#define LOGICALV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1281 of file cfortran.h.
#define LOGICALV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1521 of file cfortran.h.
#define LOGICALV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1852 of file cfortran.h.
#define LOGICALVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1282 of file cfortran.h.
#define LOGICALVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1522 of file cfortran.h.
#define LOGICALVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1879 of file cfortran.h.
#define LOGICALVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1283 of file cfortran.h.
#define LOGICALVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1523 of file cfortran.h.
#define LOGICALVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1880 of file cfortran.h.
#define LOGICALVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1284 of file cfortran.h.
#define LOGICALVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1524 of file cfortran.h.
#define LOGICALVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1881 of file cfortran.h.
#define LOGICALVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1285 of file cfortran.h.
#define LOGICALVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1525 of file cfortran.h.
#define LOGICALVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1882 of file cfortran.h.
#define LOGICALVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1286 of file cfortran.h.
#define LOGICALVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1526 of file cfortran.h.
#define LOGICALVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1883 of file cfortran.h.
#define LOGICALVVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1287 of file cfortran.h.
#define LOGICALVVVVVVV_cfPP |
Definition at line 1424 of file cfortran.h.
#define LOGICALVVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1527 of file cfortran.h.
#define LOGICALVVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1884 of file cfortran.h.
#define LOGICALVVVVVVV_cfTYPE int |
Definition at line 1219 of file cfortran.h.
#define LONG_cfCCC | ( | A, | |||
B | ) | &A |
Definition at line 1604 of file cfortran.h.
#define LONG_cfE long A0; |
Definition at line 1374 of file cfortran.h.
#define LONG_cfF | ( | UN, | |||
LN | ) | LONG_cfFZ(UN,LN) |
Definition at line 2014 of file cfortran.h.
#define LONG_cfFZ | ( | UN, | |||
LN | ) | long FCALLSC_QUALIFIER fcallsc(UN,LN)( |
Definition at line 1972 of file cfortran.h.
#define LONG_cfI return A0; |
Definition at line 2076 of file cfortran.h.
#define LONG_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1244 of file cfortran.h.
#define LONG_cfPU | ( | A | ) | CFextern long FCALLSC_QUALIFIER A |
Definition at line 1360 of file cfortran.h.
#define LONG_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1491 of file cfortran.h.
#define LONG_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | *A |
Definition at line 1846 of file cfortran.h.
#define LONG_cfVCF | ( | A, | |||
B | ) |
Definition at line 636 of file cfortran.h.
#define LONG_cfX return A0; |
Definition at line 1661 of file cfortran.h.
#define LONGV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1288 of file cfortran.h.
#define LONGV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1528 of file cfortran.h.
#define LONGV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1853 of file cfortran.h.
#define LONGVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1289 of file cfortran.h.
#define LONGVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1529 of file cfortran.h.
#define LONGVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1885 of file cfortran.h.
#define LONGVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1290 of file cfortran.h.
#define LONGVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1530 of file cfortran.h.
#define LONGVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1886 of file cfortran.h.
#define LONGVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1291 of file cfortran.h.
#define LONGVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1531 of file cfortran.h.
#define LONGVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1887 of file cfortran.h.
#define LONGVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1292 of file cfortran.h.
#define LONGVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1532 of file cfortran.h.
#define LONGVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1888 of file cfortran.h.
#define LONGVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1293 of file cfortran.h.
#define LONGVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1533 of file cfortran.h.
#define LONGVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1889 of file cfortran.h.
#define LONGVVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1294 of file cfortran.h.
#define LONGVVVVVVV_cfPP |
Definition at line 1425 of file cfortran.h.
#define LONGVVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1534 of file cfortran.h.
#define LONGVVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1890 of file cfortran.h.
#define LONGVVVVVVV_cfTYPE long |
Definition at line 1220 of file cfortran.h.
#define MAX_LEN_FORTRAN_FUNCTION_STRING 0x4FE |
Definition at line 1171 of file cfortran.h.
#define MAX_PREPRO_ARGS 99 |
Definition at line 852 of file cfortran.h.
#define NCF | ( | TN, | |||
I, | |||||
C | ) | _SEP_(TN,C,COMMA) _Icf(2,N,TN,_(A,I),0) |
Definition at line 801 of file cfortran.h.
#define NNCF | ( | TN, | |||
I, | |||||
C | ) | UUCF(TN,I,C) |
Definition at line 802 of file cfortran.h.
#define NNNCF | ( | TN, | |||
I, | |||||
C | ) | _SEP_(TN,C,COLON) _Icf(2,N,TN,_(A,I),0) |
Definition at line 803 of file cfortran.h.
#define NUM_ELEM_ARG | ( | B | ) | *_2(A,B),_NUM_ELEM_ARG |
Definition at line 532 of file cfortran.h.
#define NUM_ELEMS | ( | A | ) | A,_NUM_ELEMS |
Definition at line 531 of file cfortran.h.
#define orig_fcallsc | ( | UN, | |||
LN | ) | CFC_(UN,LN) |
Definition at line 184 of file cfortran.h.
#define PBYTE_cfAAP | ( | A, | |||
B | ) | &A |
Definition at line 706 of file cfortran.h.
#define PBYTE_cfCCC | ( | A, | |||
B | ) | A |
Definition at line 1606 of file cfortran.h.
#define PBYTE_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PDOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1246 of file cfortran.h.
#define PBYTE_cfPP |
Definition at line 1427 of file cfortran.h.
#define PBYTE_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1542 of file cfortran.h.
#define PBYTE_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1897 of file cfortran.h.
#define PBYTE_cfTYPE INTEGER_BYTE |
Definition at line 1222 of file cfortran.h.
#define PBYTE_cfVP | ( | A, | |||
B | ) | PINT_cfVP(A,B) |
Definition at line 609 of file cfortran.h.
#define PDOUBLE_cfAAP | ( | A, | |||
B | ) | &A |
Definition at line 707 of file cfortran.h.
#define PDOUBLE_cfCCC | ( | A, | |||
B | ) | A |
Definition at line 1607 of file cfortran.h.
#define PDOUBLE_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | _(CFARGS,N)(A,PINT,B,X,Y,Z,0) |
Definition at line 1247 of file cfortran.h.
#define PDOUBLE_cfPP |
Definition at line 1429 of file cfortran.h.
#define PDOUBLE_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1543 of file cfortran.h.
#define PDOUBLE_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1898 of file cfortran.h.
#define PDOUBLE_cfTYPE DOUBLE_PRECISION |
Definition at line 1223 of file cfortran.h.
#define PDOUBLE_cfVP | ( | A, | |||
B | ) |
Definition at line 610 of file cfortran.h.
#define PFLOAT_cfAAP | ( | A, | |||
B | ) | FLOATVVVVVVV_cfPP &A |
Definition at line 708 of file cfortran.h.
#define PFLOAT_cfCCC | ( | A, | |||
B | ) | A |
Definition at line 1608 of file cfortran.h.
#define PFLOAT_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PDOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1248 of file cfortran.h.
#define PFLOAT_cfPP FLOATVVVVVVV_cfPP |
Definition at line 1433 of file cfortran.h.
#define PFLOAT_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1544 of file cfortran.h.
#define PFLOAT_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | VOIDP A |
Definition at line 1899 of file cfortran.h.
#define PFLOAT_cfTYPE FORTRAN_REAL |
Definition at line 1224 of file cfortran.h.
#define PFLOAT_cfVP | ( | A, | |||
B | ) |
Definition at line 611 of file cfortran.h.
#define PINT_cfAA | ( | T, | |||
A, | |||||
B | ) | _(T,_cfAAP)(A,B) |
Definition at line 723 of file cfortran.h.
#define PINT_cfAAP | ( | A, | |||
B | ) | &A |
Definition at line 709 of file cfortran.h.
#define PINT_cfB | ( | T, | |||
A | ) | _(T,_cfPP)&A |
Definition at line 1444 of file cfortran.h.
#define PINT_cfCC | ( | T, | |||
A, | |||||
B | ) | _(T,_cfCCC)(A,B) |
Definition at line 1623 of file cfortran.h.
#define PINT_cfCCC | ( | A, | |||
B | ) | A |
Definition at line 1609 of file cfortran.h.
#define PINT_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PDOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1249 of file cfortran.h.
#define PINT_cfN | ( | T, | |||
A | ) | _(T,_cfTYPE) * A |
Definition at line 812 of file cfortran.h.
#define PINT_cfPP |
Definition at line 1428 of file cfortran.h.
#define PINT_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1192 of file cfortran.h.
#define PINT_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1545 of file cfortran.h.
#define PINT_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1900 of file cfortran.h.
#define PINT_cfTYPE int |
Definition at line 1225 of file cfortran.h.
#define PINT_cfU | ( | T, | |||
A | ) | _(T,_cfTYPE) * A |
Definition at line 1334 of file cfortran.h.
#define PINT_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) | _(T,_cfVP)(A,B) |
Definition at line 649 of file cfortran.h.
#define PINT_cfVP | ( | A, | |||
B | ) |
Definition at line 618 of file cfortran.h.
#define PLOGICAL_cfA | ( | M, | |||
I, | |||||
A, | |||||
B | ) | A=C2FLOGICAL(A); |
Definition at line 680 of file cfortran.h.
#define PLOGICAL_cfAAP | ( | A, | |||
B | ) | B= &A |
Definition at line 710 of file cfortran.h.
#define PLOGICAL_cfC | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
C | ) | *A=C2FLOGICAL(*A); |
Definition at line 1566 of file cfortran.h.
#define PLOGICAL_cfCCC | ( | A, | |||
B | ) | B=A |
Definition at line 1610 of file cfortran.h.
#define PLOGICAL_cfH | ( | S, | |||
U, | |||||
B | ) |
Definition at line 1473 of file cfortran.h.
#define PLOGICAL_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PDOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1250 of file cfortran.h.
#define PLOGICAL_cfJ | ( | B | ) | DEFAULT_cfJ(B) |
Definition at line 756 of file cfortran.h.
#define PLOGICAL_cfKK | ( | B | ) | DEFAULT_cfKK(B) |
Definition at line 772 of file cfortran.h.
#define PLOGICAL_cfPP |
Definition at line 1430 of file cfortran.h.
#define PLOGICAL_cfQ | ( | B | ) |
Definition at line 1811 of file cfortran.h.
#define PLOGICAL_cfR | ( | A, | |||
B, | |||||
D | ) | *A=C2FLOGICAL(*A); |
Definition at line 1946 of file cfortran.h.
#define PLOGICAL_cfS | ( | M, | |||
I, | |||||
A | ) |
Definition at line 1457 of file cfortran.h.
#define PLOGICAL_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,PLOGICAL,A,B,C,D,E) |
Definition at line 1546 of file cfortran.h.
#define PLOGICAL_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | ((*A=F2CLOGICAL(*A)),A) |
Definition at line 1901 of file cfortran.h.
#define PLOGICAL_cfTYPE int |
Definition at line 1226 of file cfortran.h.
#define PLOGICAL_cfVP | ( | A, | |||
B | ) | int *B; |
Definition at line 620 of file cfortran.h.
#define PLOGICAL_cfW | ( | A, | |||
B | ) | *B=F2CLOGICAL(*B); |
Definition at line 784 of file cfortran.h.
#define PLONG_cfAAP | ( | A, | |||
B | ) | &A |
Definition at line 711 of file cfortran.h.
#define PLONG_cfCCC | ( | A, | |||
B | ) | A |
Definition at line 1611 of file cfortran.h.
#define PLONG_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PDOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1251 of file cfortran.h.
#define PLONG_cfPP |
Definition at line 1431 of file cfortran.h.
#define PLONG_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1547 of file cfortran.h.
#define PLONG_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1902 of file cfortran.h.
#define PLONG_cfTYPE long |
Definition at line 1227 of file cfortran.h.
#define PLONG_cfVP | ( | A, | |||
B | ) | PINT_cfVP(A,B) |
Definition at line 621 of file cfortran.h.
#define PNSTRING_cfH | ( | S, | |||
U, | |||||
B | ) | STRING_cfH(S,U,B) |
Definition at line 1478 of file cfortran.h.
#define PNSTRING_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PVOID_cfINT(N,A,B,X,Y,Z) |
Definition at line 1316 of file cfortran.h.
#define PNSTRING_cfN | ( | T, | |||
A | ) | STRING_cfN(T,A) |
Definition at line 832 of file cfortran.h.
#define PNSTRING_cfQ | ( | B | ) | char *B=NULL; |
Definition at line 1816 of file cfortran.h.
#define PNSTRING_cfR | ( | A, | |||
B, | |||||
D | ) | PSTRING_cfR(A,B,D) |
Definition at line 1965 of file cfortran.h.
#define PNSTRING_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1201 of file cfortran.h.
#define PNSTRING_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,PNSTRING,A,B,C,D,E) |
Definition at line 1553 of file cfortran.h.
#define PNSTRING_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | STRING_cfT(M,I,A,B,D) |
Definition at line 1939 of file cfortran.h.
#define PPSTRING_cfH | ( | S, | |||
U, | |||||
B | ) | STRING_cfH(S,U,B) |
Definition at line 1479 of file cfortran.h.
#define PPSTRING_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PVOID_cfINT(N,A,B,X,Y,Z) |
Definition at line 1317 of file cfortran.h.
#define PPSTRING_cfN | ( | T, | |||
A | ) | STRING_cfN(T,A) |
Definition at line 833 of file cfortran.h.
#define PPSTRING_cfQ | ( | B | ) |
Definition at line 1817 of file cfortran.h.
#define PPSTRING_cfR | ( | A, | |||
B, | |||||
D | ) |
Definition at line 1966 of file cfortran.h.
#define PPSTRING_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1202 of file cfortran.h.
#define PPSTRING_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,PPSTRING,A,B,C,D,E) |
Definition at line 1554 of file cfortran.h.
#define PPSTRING_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1936 of file cfortran.h.
Definition at line 190 of file cfortran.h.
#define PROTOCCALLSFFUN0 | ( | F, | |||
UN, | |||||
LN | ) |
Value:
_(F,_cfPU)( CFC_(UN,LN))(CF_NULL_PROTO); \ static _Icf(2,U,F,CFFUN(UN),0)() {_(F,_cfE) _Icf(3,GZ,F,UN,LN) ABSOFT_cf1(F));_(F,_cfX)}
Definition at line 1730 of file cfortran.h.
#define PROTOCCALLSFFUN1 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1 | ) | PROTOCCALLSFFUN5 (T0,UN,LN,T1,CF_0,CF_0,CF_0,CF_0) |
Definition at line 1734 of file cfortran.h.
#define PROTOCCALLSFFUN10 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA | ) | PROTOCCALLSFFUN14(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,CF_0,CF_0,CF_0,CF_0) |
Definition at line 1752 of file cfortran.h.
#define PROTOCCALLSFFUN11 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB | ) | PROTOCCALLSFFUN14(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,CF_0,CF_0,CF_0) |
Definition at line 1754 of file cfortran.h.
#define PROTOCCALLSFFUN12 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC | ) | PROTOCCALLSFFUN14(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,CF_0,CF_0) |
Definition at line 1756 of file cfortran.h.
#define PROTOCCALLSFFUN13 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD | ) | PROTOCCALLSFFUN14(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,CF_0) |
Definition at line 1758 of file cfortran.h.
#define PROTOCCALLSFFUN14 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE | ) |
Value:
_(T0,_cfPU)(CFC_(UN,LN))(CF_NULL_PROTO); static _Icf(2,U,T0,CFFUN(UN),0)( \ CFARGT14FS(UCF,HCF,_Z,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE) ) \ { CFARGT14S(VCF,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE) _(T0,_cfE) \ CCF(LN,T1,1) CCF(LN,T2,2) CCF(LN,T3,3) CCF(LN,T4,4) CCF(LN,T5,5) \ CCF(LN,T6,6) CCF(LN,T7,7) CCF(LN,T8,8) CCF(LN,T9,9) CCF(LN,TA,A) \ CCF(LN,TB,B) CCF(LN,TC,C) CCF(LN,TD,D) CCF(LN,TE,E) _Icf(3,G,T0,UN,LN) \ CFARGT14(CCCF,JCF,ABSOFT_cf1(T0),T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE)); \ WCF(T1,A1,1) WCF(T2,A2,2) WCF(T3,A3,3) WCF(T4,A4,4) WCF(T5,A5,5) \ WCF(T6,A6,6) WCF(T7,A7,7) WCF(T8,A8,8) WCF(T9,A9,9) WCF(TA,AA,A) \ WCF(TB,AB,B) WCF(TC,AC,C) WCF(TD,AD,D) WCF(TE,AE,E) _(T0,_cfX)}
Definition at line 1764 of file cfortran.h.
#define PROTOCCALLSFFUN2 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2 | ) | PROTOCCALLSFFUN5 (T0,UN,LN,T1,T2,CF_0,CF_0,CF_0) |
Definition at line 1736 of file cfortran.h.
#define PROTOCCALLSFFUN3 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3 | ) | PROTOCCALLSFFUN5 (T0,UN,LN,T1,T2,T3,CF_0,CF_0) |
Definition at line 1738 of file cfortran.h.
#define PROTOCCALLSFFUN4 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4 | ) | PROTOCCALLSFFUN5 (T0,UN,LN,T1,T2,T3,T4,CF_0) |
Definition at line 1740 of file cfortran.h.
#define PROTOCCALLSFFUN5 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5 | ) | PROTOCCALLSFFUN10(T0,UN,LN,T1,T2,T3,T4,T5,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 1742 of file cfortran.h.
#define PROTOCCALLSFFUN6 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6 | ) | PROTOCCALLSFFUN10(T0,UN,LN,T1,T2,T3,T4,T5,T6,CF_0,CF_0,CF_0,CF_0) |
Definition at line 1744 of file cfortran.h.
#define PROTOCCALLSFFUN7 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7 | ) | PROTOCCALLSFFUN10(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,CF_0,CF_0,CF_0) |
Definition at line 1746 of file cfortran.h.
#define PROTOCCALLSFFUN8 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8 | ) | PROTOCCALLSFFUN10(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,CF_0,CF_0) |
Definition at line 1748 of file cfortran.h.
#define PROTOCCALLSFFUN9 | ( | T0, | |||
UN, | |||||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9 | ) | PROTOCCALLSFFUN10(T0,UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,CF_0) |
Definition at line 1750 of file cfortran.h.
#define PROTOCCALLSFSUB0 | ( | UN, | |||
LN | ) | CFextern void FCALLSC_QUALIFIER CFC_(UN,LN)(); |
Definition at line 1035 of file cfortran.h.
#define PROTOCCALLSFSUB1 | ( | UN, | |||
LN, | |||||
T1 | ) | PROTOCCALLSFSUB14(UN,LN,T1,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 969 of file cfortran.h.
#define PROTOCCALLSFSUB10 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,CF_0,CF_0,CF_0,CF_0) |
Definition at line 987 of file cfortran.h.
#define PROTOCCALLSFSUB11 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,CF_0,CF_0,CF_0) |
Definition at line 989 of file cfortran.h.
#define PROTOCCALLSFSUB12 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,CF_0,CF_0) |
Definition at line 991 of file cfortran.h.
#define PROTOCCALLSFSUB13 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,CF_0) |
Definition at line 993 of file cfortran.h.
#define PROTOCCALLSFSUB14 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE | ) | CFextern void FCALLSC_QUALIFIER CFC_(UN,LN)( CFARGT14(NCF,KCF,_Z,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE) ); |
Definition at line 1037 of file cfortran.h.
#define PROTOCCALLSFSUB15 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF | ) | PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 997 of file cfortran.h.
#define PROTOCCALLSFSUB16 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG | ) | PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,CF_0,CF_0,CF_0,CF_0) |
Definition at line 999 of file cfortran.h.
#define PROTOCCALLSFSUB17 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
TH | ) | PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,CF_0,CF_0,CF_0) |
Definition at line 1001 of file cfortran.h.
#define PROTOCCALLSFSUB18 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
TH, | |||||
TI | ) | PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,CF_0,CF_0) |
Definition at line 1003 of file cfortran.h.
#define PROTOCCALLSFSUB19 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
TH, | |||||
TI, | |||||
TJ | ) | PROTOCCALLSFSUB20(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,TJ,CF_0) |
Definition at line 1005 of file cfortran.h.
#define PROTOCCALLSFSUB2 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2 | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 971 of file cfortran.h.
#define PROTOCCALLSFSUB20 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9, | |||||
TA, | |||||
TB, | |||||
TC, | |||||
TD, | |||||
TE, | |||||
TF, | |||||
TG, | |||||
TH, | |||||
TI, | |||||
TJ, | |||||
TK | ) | CFextern void FCALLSC_QUALIFIER CFC_(UN,LN)( CFARGT20(NCF,KCF,T1,T2,T3,T4,T5,T6,T7,T8,T9,TA,TB,TC,TD,TE,TF,TG,TH,TI,TJ,TK) ); |
Definition at line 1039 of file cfortran.h.
#define PROTOCCALLSFSUB3 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3 | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 973 of file cfortran.h.
#define PROTOCCALLSFSUB4 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4 | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 975 of file cfortran.h.
#define PROTOCCALLSFSUB5 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5 | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 977 of file cfortran.h.
#define PROTOCCALLSFSUB6 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6 | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 979 of file cfortran.h.
#define PROTOCCALLSFSUB7 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7 | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 981 of file cfortran.h.
#define PROTOCCALLSFSUB8 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8 | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,CF_0,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 983 of file cfortran.h.
#define PROTOCCALLSFSUB9 | ( | UN, | |||
LN, | |||||
T1, | |||||
T2, | |||||
T3, | |||||
T4, | |||||
T5, | |||||
T6, | |||||
T7, | |||||
T8, | |||||
T9 | ) | PROTOCCALLSFSUB14(UN,LN,T1,T2,T3,T4,T5,T6,T7,T8,T9,CF_0,CF_0,CF_0,CF_0,CF_0) |
Definition at line 985 of file cfortran.h.
#define PSHORT_cfAAP | ( | A, | |||
B | ) | &A |
Definition at line 712 of file cfortran.h.
#define PSHORT_cfCCC | ( | A, | |||
B | ) | A |
Definition at line 1612 of file cfortran.h.
#define PSHORT_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PDOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1252 of file cfortran.h.
#define PSHORT_cfPP |
Definition at line 1432 of file cfortran.h.
#define PSHORT_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1548 of file cfortran.h.
#define PSHORT_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1903 of file cfortran.h.
#define PSHORT_cfTYPE short |
Definition at line 1228 of file cfortran.h.
#define PSHORT_cfVP | ( | A, | |||
B | ) | PINT_cfVP(A,B) |
Definition at line 622 of file cfortran.h.
#define PSTRING_cfA | ( | M, | |||
I, | |||||
A, | |||||
B | ) | PSTRING_cfC(M,I,A,B,sizeof(A)) |
Definition at line 682 of file cfortran.h.
#define PSTRING_cfAA | ( | T, | |||
A, | |||||
B | ) | PSTRING_cfCC(T,A,B) |
Definition at line 731 of file cfortran.h.
#define PSTRING_cfB | ( | T, | |||
A | ) | (char *) A |
Definition at line 1447 of file cfortran.h.
#define PSTRING_cfC | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
C | ) |
Value:
(C==sizeof(char*)? B=strlen(A): \ (A[C-1]='\0',B=strlen(A),memset((A)+B,' ',C-B-1),B=C-1));
Definition at line 1579 of file cfortran.h.
#define PSTRING_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1645 of file cfortran.h.
#define PSTRING_cfH | ( | S, | |||
U, | |||||
B | ) | STRING_cfH(S,U,B) |
Definition at line 1476 of file cfortran.h.
#define PSTRING_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PVOID_cfINT(N,A,B,X,Y,Z) |
Definition at line 1314 of file cfortran.h.
#define PSTRING_cfJ | ( | B | ) | ,B |
Definition at line 758 of file cfortran.h.
#define PSTRING_cfKK | ( | B | ) | STRING_cfKK(B) |
Definition at line 774 of file cfortran.h.
#define PSTRING_cfN | ( | T, | |||
A | ) | STRING_cfN(T,A) |
Definition at line 831 of file cfortran.h.
#define PSTRING_cfQ | ( | B | ) | char *B=NULL; |
Definition at line 1814 of file cfortran.h.
#define PSTRING_cfR | ( | A, | |||
B, | |||||
D | ) | RRRRPSTR( A,B,D) |
Definition at line 1961 of file cfortran.h.
#define PSTRING_cfS | ( | M, | |||
I, | |||||
A | ) | ,sizeof(A) |
Definition at line 1461 of file cfortran.h.
#define PSTRING_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1199 of file cfortran.h.
#define PSTRING_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,PSTRING,A,B,C,D,E) |
Definition at line 1550 of file cfortran.h.
#define PSTRING_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | TTSTR( A,B,D) |
Definition at line 1935 of file cfortran.h.
#define PSTRING_cfU | ( | T, | |||
A | ) | char *A |
Definition at line 1340 of file cfortran.h.
#define PSTRING_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) | int B; |
Definition at line 668 of file cfortran.h.
#define PSTRING_cfW | ( | A, | |||
B | ) | kill_trailing(A,' '); |
Definition at line 786 of file cfortran.h.
#define PSTRINGV_cfA | ( | M, | |||
I, | |||||
A, | |||||
B | ) | APATRINGV_cfA((char *)A,B,sizeof(A),firstindexlength(A),secondindexlength(A)) |
Definition at line 697 of file cfortran.h.
#define PSTRINGV_cfAA | ( | T, | |||
A, | |||||
B | ) | STRINGV_cfAA(T,A,B) |
Definition at line 741 of file cfortran.h.
#define PSTRINGV_cfB | ( | T, | |||
A | ) | (char *) A |
Definition at line 1448 of file cfortran.h.
#define PSTRINGV_cfC | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
C | ) | APATRINGV_cfA( A,B,(C/0xFFFF)*(C%0xFFFF),C/0xFFFF,C%0xFFFF) |
Definition at line 1585 of file cfortran.h.
#define PSTRINGV_cfCC | ( | T, | |||
A, | |||||
B | ) | B.fs |
Definition at line 1646 of file cfortran.h.
#define PSTRINGV_cfH | ( | S, | |||
U, | |||||
B | ) | STRING_cfH(S,U,B) |
Definition at line 1477 of file cfortran.h.
#define PSTRINGV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PVOID_cfINT(N,A,B,X,Y,Z) |
Definition at line 1315 of file cfortran.h.
#define PSTRINGV_cfJ | ( | B | ) | STRING_cfJ(B) |
Definition at line 760 of file cfortran.h.
#define PSTRINGV_cfKK | ( | B | ) | STRING_cfKK(B) |
Definition at line 776 of file cfortran.h.
#define PSTRINGV_cfN | ( | T, | |||
A | ) | STRINGV_cfN(T,A) |
Definition at line 834 of file cfortran.h.
#define PSTRINGV_cfQ | ( | B | ) | STRINGV_cfQ(B) |
Definition at line 1815 of file cfortran.h.
#define PSTRINGV_cfR | ( | A, | |||
B, | |||||
D | ) | RRRRPSTRV(A,B,D) |
Definition at line 1962 of file cfortran.h.
#define PSTRINGV_cfS | ( | M, | |||
I, | |||||
A | ) | STRINGV_cfS(M,I,A) |
Definition at line 1462 of file cfortran.h.
#define PSTRINGV_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1200 of file cfortran.h.
#define PSTRINGV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,PSTRINGV,A,B,C,D,E) |
Definition at line 1552 of file cfortran.h.
#define PSTRINGV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | STRINGV_cfT(M,I,A,B,D) |
Definition at line 1940 of file cfortran.h.
#define PSTRINGV_cfU | ( | T, | |||
A | ) | char *A |
Definition at line 1341 of file cfortran.h.
#define PSTRINGV_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) | struct{char *fs; unsigned int sizeofA,flen;}B; |
Definition at line 669 of file cfortran.h.
#define PSTRINGV_cfW | ( | A, | |||
B | ) |
Value:
vkill_trailing( \ f2cstrv((char*)A,(char*)A,B.flen+1,B.sizeofA), B.flen+1,B.sizeofA,' ');
Definition at line 795 of file cfortran.h.
#define PVOID_cfAA | ( | T, | |||
A, | |||||
B | ) | (void *) A |
Definition at line 724 of file cfortran.h.
#define PVOID_cfB | ( | T, | |||
A | ) | (void *) A |
Definition at line 1449 of file cfortran.h.
#define PVOID_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1624 of file cfortran.h.
#define PVOID_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | _(CFARGS,N)(A,B,B,X,Y,Z,0) |
Definition at line 1302 of file cfortran.h.
#define PVOID_cfN | ( | T, | |||
A | ) | void * A |
Definition at line 813 of file cfortran.h.
#define PVOID_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1193 of file cfortran.h.
#define PVOID_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1555 of file cfortran.h.
#define PVOID_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1904 of file cfortran.h.
#define PVOID_cfU | ( | T, | |||
A | ) | void *A |
Definition at line 1335 of file cfortran.h.
#define PVOID_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) |
Definition at line 650 of file cfortran.h.
#define PZTRINGV_cfA | ( | M, | |||
I, | |||||
A, | |||||
B | ) |
Value:
APATRINGV_cfA( (char *)A,B, \ (_3(M,_ELEMS_,I))*(( _3(M,_ELEMLEN_,I))+1), \ (_3(M,_ELEMS_,I)),(_3(M,_ELEMLEN_,I))+1)
Definition at line 702 of file cfortran.h.
#define PZTRINGV_cfAA | ( | T, | |||
A, | |||||
B | ) | STRINGV_cfAA(T,A,B) |
Definition at line 743 of file cfortran.h.
#define PZTRINGV_cfB | ( | T, | |||
A | ) | (char *) A |
Definition at line 1452 of file cfortran.h.
#define PZTRINGV_cfC | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
C | ) |
Value:
APATRINGV_cfA( A,B, (_3(M,_ELEMS_,I))*((_3(M,_ELEMLEN_,I))+1), \ (_3(M,_ELEMS_,I)), (_3(M,_ELEMLEN_,I))+1 )
Definition at line 1590 of file cfortran.h.
#define PZTRINGV_cfCC | ( | T, | |||
A, | |||||
B | ) | PSTRINGV_cfCC(T,A,B) |
Definition at line 1650 of file cfortran.h.
#define PZTRINGV_cfH | ( | S, | |||
U, | |||||
B | ) |
Definition at line 1481 of file cfortran.h.
#define PZTRINGV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PVOID_cfINT(N,A,B,X,Y,Z) |
Definition at line 1319 of file cfortran.h.
#define PZTRINGV_cfJ | ( | B | ) | STRING_cfJ(B) |
Definition at line 762 of file cfortran.h.
#define PZTRINGV_cfKK | ( | B | ) | STRING_cfKK(B) |
Definition at line 778 of file cfortran.h.
#define PZTRINGV_cfN | ( | T, | |||
A | ) | PSTRINGV_cfN(T,A) |
Definition at line 836 of file cfortran.h.
#define PZTRINGV_cfS | ( | M, | |||
I, | |||||
A | ) |
Definition at line 1464 of file cfortran.h.
#define PZTRINGV_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1204 of file cfortran.h.
#define PZTRINGV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,PZTRINGV,A,B,C,D,E) |
Definition at line 1559 of file cfortran.h.
#define PZTRINGV_cfU | ( | T, | |||
A | ) | char *A |
Definition at line 1343 of file cfortran.h.
#define PZTRINGV_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) | PSTRINGV_cfV(T,A,B,F) |
Definition at line 672 of file cfortran.h.
#define PZTRINGV_cfW | ( | A, | |||
B | ) | PSTRINGV_cfW(A,B) |
Definition at line 799 of file cfortran.h.
#define QCF | ( | TN, | |||
I | ) | _(TN,_cfSTR)(1,Q,_(B,I), 0,0,0,0) |
Definition at line 1808 of file cfortran.h.
#define RCF | ( | TN, | |||
I | ) | _(TN,_cfSTR)(3,R,_(A,I),_(B,I),_(C,I),0,0) |
Definition at line 1943 of file cfortran.h.
#define ROUTINE_1 ROUTINE_orig |
Definition at line 1825 of file cfortran.h.
#define ROUTINE_10 ROUTINE_orig |
Definition at line 1834 of file cfortran.h.
#define ROUTINE_11 ROUTINE_orig |
Definition at line 1835 of file cfortran.h.
#define ROUTINE_12 ROUTINE_orig |
Definition at line 1836 of file cfortran.h.
#define ROUTINE_13 ROUTINE_orig |
Definition at line 1837 of file cfortran.h.
#define ROUTINE_14 ROUTINE_orig |
Definition at line 1838 of file cfortran.h.
#define ROUTINE_2 ROUTINE_orig |
Definition at line 1826 of file cfortran.h.
#define ROUTINE_3 ROUTINE_orig |
Definition at line 1827 of file cfortran.h.
#define ROUTINE_4 ROUTINE_orig |
Definition at line 1828 of file cfortran.h.
#define ROUTINE_5 ROUTINE_orig |
Definition at line 1829 of file cfortran.h.
#define ROUTINE_6 ROUTINE_orig |
Definition at line 1830 of file cfortran.h.
#define ROUTINE_7 ROUTINE_orig |
Definition at line 1831 of file cfortran.h.
#define ROUTINE_8 ROUTINE_orig |
Definition at line 1832 of file cfortran.h.
#define ROUTINE_9 ROUTINE_orig |
Definition at line 1833 of file cfortran.h.
#define ROUTINE_cfAA | ( | T, | |||
A, | |||||
B | ) | (void(*)(CF_NULL_PROTO))A |
Definition at line 728 of file cfortran.h.
#define ROUTINE_cfB | ( | T, | |||
A | ) | (void(*)(CF_NULL_PROTO))A |
Definition at line 1450 of file cfortran.h.
#define ROUTINE_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1628 of file cfortran.h.
#define ROUTINE_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PVOID_cfINT(N,A,B,X,Y,Z) |
Definition at line 1303 of file cfortran.h.
#define ROUTINE_cfN | ( | T, | |||
A | ) | void ( *A)(CF_NULL_PROTO) |
Definition at line 817 of file cfortran.h.
#define ROUTINE_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1194 of file cfortran.h.
#define ROUTINE_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1556 of file cfortran.h.
#define ROUTINE_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | _(ROUTINE_,I) A |
Definition at line 1908 of file cfortran.h.
#define ROUTINE_cfU | ( | T, | |||
A | ) | void (*A)(CF_NULL_PROTO) |
Definition at line 1336 of file cfortran.h.
#define ROUTINE_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) |
Definition at line 654 of file cfortran.h.
#define ROUTINE_orig (void *) |
Definition at line 1822 of file cfortran.h.
#define RRRRPSTR | ( | A, | |||
B, | |||||
D | ) |
Value:
if (B) memcpy(A,B, _cfMIN(strlen(B),D)), \ (D>strlen(B)?memset(A+strlen(B),' ', D-strlen(B)):0), free(B);
Definition at line 1950 of file cfortran.h.
#define RRRRPSTRV | ( | A, | |||
B, | |||||
D | ) | c2fstrv(B,A,D+1,(D+1)*_(B,N)), free(B); |
Definition at line 1952 of file cfortran.h.
#define SCF | ( | TN, | |||
NAME, | |||||
I, | |||||
A | ) | _(TN,_cfSTR)(3,S,NAME,I,A,0,0) |
Definition at line 1454 of file cfortran.h.
#define secondindexlength | ( | A | ) | (sizeof(A[0])==1 ? sizeof(A) : sizeof(A[0]) ) |
Definition at line 317 of file cfortran.h.
#define SHORT_cfCCC | ( | A, | |||
B | ) | &A |
Definition at line 1605 of file cfortran.h.
#define SHORT_cfE short A0; |
Definition at line 1375 of file cfortran.h.
#define SHORT_cfF | ( | UN, | |||
LN | ) | SHORT_cfFZ(UN,LN) |
Definition at line 2015 of file cfortran.h.
#define SHORT_cfFZ | ( | UN, | |||
LN | ) | short FCALLSC_QUALIFIER fcallsc(UN,LN)( |
Definition at line 1973 of file cfortran.h.
#define SHORT_cfI return A0; |
Definition at line 2077 of file cfortran.h.
#define SHORT_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLE_cfINT(N,A,B,X,Y,Z) |
Definition at line 1245 of file cfortran.h.
#define SHORT_cfPU | ( | A | ) | CFextern short FCALLSC_QUALIFIER A |
Definition at line 1361 of file cfortran.h.
#define SHORT_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1492 of file cfortran.h.
#define SHORT_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | *A |
Definition at line 1847 of file cfortran.h.
#define SHORT_cfVCF | ( | A, | |||
B | ) |
Definition at line 637 of file cfortran.h.
#define SHORT_cfX return A0; |
Definition at line 1662 of file cfortran.h.
#define SHORTV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1295 of file cfortran.h.
#define SHORTV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1535 of file cfortran.h.
#define SHORTV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | A |
Definition at line 1854 of file cfortran.h.
#define SHORTVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1296 of file cfortran.h.
#define SHORTVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1536 of file cfortran.h.
#define SHORTVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1891 of file cfortran.h.
#define SHORTVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1297 of file cfortran.h.
#define SHORTVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1537 of file cfortran.h.
#define SHORTVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1892 of file cfortran.h.
#define SHORTVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1298 of file cfortran.h.
#define SHORTVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1538 of file cfortran.h.
#define SHORTVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1893 of file cfortran.h.
#define SHORTVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1299 of file cfortran.h.
#define SHORTVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1539 of file cfortran.h.
#define SHORTVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1894 of file cfortran.h.
#define SHORTVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1300 of file cfortran.h.
#define SHORTVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1540 of file cfortran.h.
#define SHORTVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1895 of file cfortran.h.
#define SHORTVVVVVVV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | DOUBLEVVVVVVV_cfINT(N,A,B,X,Y,Z) |
Definition at line 1301 of file cfortran.h.
#define SHORTVVVVVVV_cfPP |
Definition at line 1426 of file cfortran.h.
#define SHORTVVVVVVV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1541 of file cfortran.h.
#define SHORTVVVVVVV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | (void *)A |
Definition at line 1896 of file cfortran.h.
#define SHORTVVVVVVV_cfTYPE short |
Definition at line 1221 of file cfortran.h.
#define SIMPLE_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1630 of file cfortran.h.
#define SIMPLE_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PVOID_cfINT(N,A,B,X,Y,Z) |
Definition at line 1310 of file cfortran.h.
#define SIMPLE_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1195 of file cfortran.h.
#define SIMPLE_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1557 of file cfortran.h.
#define SIMPLE_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) |
Definition at line 656 of file cfortran.h.
#define STRING_cfA | ( | M, | |||
I, | |||||
A, | |||||
B | ) | STRING_cfC(M,I,A,B,sizeof(A)) |
Definition at line 681 of file cfortran.h.
#define STRING_cfAA | ( | T, | |||
A, | |||||
B | ) | STRING_cfCC(T,A,B) |
Definition at line 730 of file cfortran.h.
#define STRING_cfB | ( | T, | |||
A | ) | (char *) A |
Definition at line 1445 of file cfortran.h.
#define STRING_cfC | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
C | ) |
Value:
(B.clen=strlen(A), \ C==sizeof(char*)||C==(unsigned)(B.clen+1)?B.flen=B.clen: \ (memset((A)+B.clen,' ',C-B.clen-1),A[B.flen=C-1]='\0'));
Definition at line 1576 of file cfortran.h.
#define STRING_cfCC | ( | T, | |||
A, | |||||
B | ) | A |
Definition at line 1643 of file cfortran.h.
#define STRING_cfE |
Value:
static char A0[1+MAX_LEN_FORTRAN_FUNCTION_STRING]; \ memset(A0, CFORTRAN_NON_CHAR, \ MAX_LEN_FORTRAN_FUNCTION_STRING); \ *(A0+MAX_LEN_FORTRAN_FUNCTION_STRING)='\0';
Definition at line 1392 of file cfortran.h.
#define STRING_cfF | ( | UN, | |||
LN | ) | STRING_cfFZ(UN,LN), |
Definition at line 2017 of file cfortran.h.
#define STRING_cfFF char *AS; unsigned D0; |
Definition at line 2027 of file cfortran.h.
#define STRING_cfFZ | ( | UN, | |||
LN | ) | void FCALLSC_QUALIFIER fcallsc(UN,LN)(char *AS, unsigned D0 |
Definition at line 1988 of file cfortran.h.
#define STRING_cfG | ( | T, | |||
UN, | |||||
LN | ) | STRING_cfGZ(T,UN,LN), |
Definition at line 1419 of file cfortran.h.
#define STRING_cfGZ | ( | T, | |||
UN, | |||||
LN | ) | CFC_(UN,LN)( A0,MAX_LEN_FORTRAN_FUNCTION_STRING |
Definition at line 1413 of file cfortran.h.
#define STRING_cfH | ( | S, | |||
U, | |||||
B | ) | _(A,S) _(U,_CF_SPECIAL) B |
Definition at line 1474 of file cfortran.h.
#define STRING_cfI return ; |
Definition at line 2078 of file cfortran.h.
#define STRING_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PVOID_cfINT(N,A,B,X,Y,Z) |
Definition at line 1312 of file cfortran.h.
#define STRING_cfJ | ( | B | ) | ,B.flen |
Definition at line 757 of file cfortran.h.
#define STRING_cfK |
Value:
memcpy(AS,A0, _cfMIN(D0,(A0==NULL?0:strlen(A0))) ); \ D0>(A0==NULL?0:strlen(A0))?memset(AS+(A0==NULL?0:strlen(A0)), \ ' ', D0-(A0==NULL?0:strlen(A0))):0;
Definition at line 2052 of file cfortran.h.
#define STRING_cfKK | ( | B | ) | , unsigned B |
Definition at line 773 of file cfortran.h.
#define STRING_cfL A0= |
Definition at line 2032 of file cfortran.h.
#define STRING_cfN | ( | T, | |||
A | ) | char * A |
Definition at line 827 of file cfortran.h.
#define STRING_cfPU | ( | A | ) | CFextern void FCALLSC_QUALIFIER A |
Definition at line 1362 of file cfortran.h.
#define STRING_cfQ | ( | B | ) | char *B=NULL; |
Definition at line 1813 of file cfortran.h.
#define STRING_cfR | ( | A, | |||
B, | |||||
D | ) | if (B) free(B); |
Definition at line 1947 of file cfortran.h.
#define STRING_cfS | ( | M, | |||
I, | |||||
A | ) | ,sizeof(A) |
Definition at line 1458 of file cfortran.h.
#define STRING_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1197 of file cfortran.h.
#define STRING_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,STRING,A,B,C,D,E) |
Definition at line 1549 of file cfortran.h.
#define STRING_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | TTTTSTR( A,B,D) |
Definition at line 1933 of file cfortran.h.
#define STRING_cfU | ( | T, | |||
A | ) | char *A |
Definition at line 1338 of file cfortran.h.
#define STRING_cfUU | ( | T, | |||
A | ) | char *A |
Definition at line 1348 of file cfortran.h.
#define STRING_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) | struct {unsigned int clen, flen;} B; |
Definition at line 666 of file cfortran.h.
#define STRING_cfW | ( | A, | |||
B | ) | (A[B.clen]!='\0'?A[B.clen]='\0':0); |
Definition at line 785 of file cfortran.h.
#define STRING_cfX |
Value:
return kill_trailing( \ kill_trailing( A0,CFORTRAN_NON_CHAR),' ');
Definition at line 1668 of file cfortran.h.
#define STRINGV_cfA | ( | M, | |||
I, | |||||
A, | |||||
B | ) | AATRINGV_cfA((char *)A,B,sizeof(A),firstindexlength(A),secondindexlength(A)) |
Definition at line 695 of file cfortran.h.
#define STRINGV_cfAA | ( | T, | |||
A, | |||||
B | ) | B.fs |
Definition at line 738 of file cfortran.h.
#define STRINGV_cfB | ( | T, | |||
A | ) | (char *) A |
Definition at line 1446 of file cfortran.h.
#define STRINGV_cfC | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
C | ) | AATRINGV_cfA( A,B,(C/0xFFFF)*(C%0xFFFF),C/0xFFFF,C%0xFFFF) |
Definition at line 1583 of file cfortran.h.
#define STRINGV_cfCC | ( | T, | |||
A, | |||||
B | ) | B.fs |
Definition at line 1644 of file cfortran.h.
#define STRINGV_cfH | ( | S, | |||
U, | |||||
B | ) | STRING_cfH(S,U,B) |
Definition at line 1475 of file cfortran.h.
#define STRINGV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PVOID_cfINT(N,A,B,X,Y,Z) |
Definition at line 1313 of file cfortran.h.
#define STRINGV_cfJ | ( | B | ) | STRING_cfJ(B) |
Definition at line 759 of file cfortran.h.
#define STRINGV_cfKK | ( | B | ) | STRING_cfKK(B) |
Definition at line 775 of file cfortran.h.
#define STRINGV_cfN | ( | T, | |||
A | ) | char * A |
Definition at line 828 of file cfortran.h.
#define STRINGV_cfQ | ( | B | ) | char *B; unsigned int _(B,N); |
Definition at line 1812 of file cfortran.h.
#define STRINGV_cfR | ( | A, | |||
B, | |||||
D | ) | free(B); |
Definition at line 1948 of file cfortran.h.
#define STRINGV_cfS | ( | M, | |||
I, | |||||
A | ) |
Value:
,( (unsigned)0xFFFF*firstindexlength(A) \ +secondindexlength(A))
Definition at line 1459 of file cfortran.h.
#define STRINGV_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1198 of file cfortran.h.
#define STRINGV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,STRINGV,A,B,C,D,E) |
Definition at line 1551 of file cfortran.h.
#define STRINGV_cfT | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
D | ) | TTTTSTRV(A,B,D, num_elem(A,D,_3(M,_STRV_A,I))) |
Definition at line 1934 of file cfortran.h.
#define STRINGV_cfU | ( | T, | |||
A | ) | char *A |
Definition at line 1339 of file cfortran.h.
#define STRINGV_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) | struct {char *s, *fs; unsigned flen;} B; |
Definition at line 667 of file cfortran.h.
#define STRINGV_cfW | ( | A, | |||
B | ) | free(B.s); |
Definition at line 794 of file cfortran.h.
#define TCF | ( | NAME, | |||
TN, | |||||
I, | |||||
M | ) | _SEP_(TN,M,COMMA) _(TN,_cfT)(NAME,I,_(A,I),_(B,I),_(C,I)) |
Definition at line 1840 of file cfortran.h.
#define TERM_CHARS | ( | A, | |||
B | ) | A,B |
Definition at line 533 of file cfortran.h.
#define TTSTR | ( | A, | |||
B, | |||||
D | ) | ((B=(char*)malloc(D+1))[D]='\0', memcpy(B,A,D), kill_trailing(B,' ')) |
Definition at line 1913 of file cfortran.h.
#define TTTTSTR | ( | A, | |||
B, | |||||
D | ) |
Value:
(!(D<4||A[0]||A[1]||A[2]||A[3]))?NULL: \ memchr(A,'\0',D) ?A : TTSTR(A,B,D)
Definition at line 1915 of file cfortran.h.
#define TTTTSTRV | ( | A, | |||
B, | |||||
D, | |||||
E | ) |
Value:
(_(B,N)=E,B=(char*)malloc(_(B,N)*(D+1)), (void *) \ vkill_trailing(f2cstrv(A,B,D+1, _(B,N)*(D+1)), D+1,_(B,N)*(D+1),' '))
Definition at line 1917 of file cfortran.h.
#define UCF | ( | TN, | |||
I, | |||||
C | ) | _SEP_(TN,C,COMMA) _Icf(2,U,TN,_(A,I),0) |
Definition at line 1323 of file cfortran.h.
#define UUCF | ( | TN, | |||
I, | |||||
C | ) | _SEP_(TN,C,COMMA) _SEP_(TN,1,I) |
Definition at line 1324 of file cfortran.h.
#define UUUCF | ( | TN, | |||
I, | |||||
C | ) | _SEP_(TN,C,COLON) _Icf(2,U,TN,_(A,I),0) |
Definition at line 1325 of file cfortran.h.
#define VCF | ( | TN, | |||
I | ) | _Icf4(4,V,TN,_(A,I),_(B,I),F) |
Definition at line 639 of file cfortran.h.
#define VCF_INT_F | ( | T, | |||
A, | |||||
B | ) | _(T,_cfVCF)(A,B) |
Definition at line 625 of file cfortran.h.
#define VCF_INT_S | ( | T, | |||
A, | |||||
B | ) | _(T,VVVVVVV_cfTYPE) B = A; |
Definition at line 624 of file cfortran.h.
#define VOID_cfE |
Definition at line 1376 of file cfortran.h.
#define VOID_cfF | ( | UN, | |||
LN | ) | VOID_cfFZ(UN,LN) |
Definition at line 2016 of file cfortran.h.
#define VOID_cfFF |
Definition at line 2020 of file cfortran.h.
#define VOID_cfFZ | ( | UN, | |||
LN | ) | void FCALLSC_QUALIFIER fcallsc(UN,LN)( |
Definition at line 1974 of file cfortran.h.
#define VOID_cfG | ( | T, | |||
UN, | |||||
LN | ) | VOID_cfGZ(T,UN,LN) |
Definition at line 1418 of file cfortran.h.
#define VOID_cfGZ | ( | T, | |||
UN, | |||||
LN | ) | CFC_(UN,LN)( |
Definition at line 1406 of file cfortran.h.
#define VOID_cfI return ; |
Definition at line 2079 of file cfortran.h.
#define VOID_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PVOID_cfINT(N,A,B,X,Y,Z) |
Definition at line 1311 of file cfortran.h.
#define VOID_cfK |
Definition at line 2036 of file cfortran.h.
#define VOID_cfL |
Definition at line 2033 of file cfortran.h.
#define VOID_cfPU | ( | A | ) | CFextern void FCALLSC_QUALIFIER A |
Definition at line 1363 of file cfortran.h.
#define VOID_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1196 of file cfortran.h.
#define VOID_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,DEFAULT,A,B,C,D,E) |
Definition at line 1485 of file cfortran.h.
#define VOID_cfU | ( | T, | |||
A | ) | void A |
Definition at line 1337 of file cfortran.h.
#define VOID_cfUU | ( | T, | |||
A | ) |
Definition at line 1347 of file cfortran.h.
#define VOID_cfX return ; |
Definition at line 1663 of file cfortran.h.
#define VOIDP |
Definition at line 240 of file cfortran.h.
#define VVCF | ( | TN, | |||
AI, | |||||
BI | ) | _Icf4(4,V,TN,AI,BI,S) |
Definition at line 640 of file cfortran.h.
#define WCF | ( | TN, | |||
AN, | |||||
I | ) | _(TN,_cfSTR)(2,W,AN,_(B,I), 0,0,0) |
Definition at line 781 of file cfortran.h.
#define ZTRINGV_ARGF | ( | I | ) | _2(A,I) |
Definition at line 602 of file cfortran.h.
#define ZTRINGV_ARGFP | ( | I | ) | (*(_2(A,I))) |
Definition at line 601 of file cfortran.h.
#define ZTRINGV_ARGS | ( | I | ) | _2(B,I) |
Definition at line 606 of file cfortran.h.
#define ZTRINGV_cfA | ( | M, | |||
I, | |||||
A, | |||||
B | ) |
Value:
AATRINGV_cfA( (char *)A,B, \ (_3(M,_ELEMS_,I))*(( _3(M,_ELEMLEN_,I))+1), \ (_3(M,_ELEMS_,I)),(_3(M,_ELEMLEN_,I))+1)
Definition at line 699 of file cfortran.h.
#define ZTRINGV_cfAA | ( | T, | |||
A, | |||||
B | ) | STRINGV_cfAA(T,A,B) |
Definition at line 742 of file cfortran.h.
#define ZTRINGV_cfB | ( | T, | |||
A | ) | (char *) A |
Definition at line 1451 of file cfortran.h.
#define ZTRINGV_cfC | ( | M, | |||
I, | |||||
A, | |||||
B, | |||||
C | ) |
Value:
AATRINGV_cfA( A,B, (_3(M,_ELEMS_,I))*((_3(M,_ELEMLEN_,I))+1), \ (_3(M,_ELEMS_,I)), (_3(M,_ELEMLEN_,I))+1 )
Definition at line 1587 of file cfortran.h.
#define ZTRINGV_cfCC | ( | T, | |||
A, | |||||
B | ) | STRINGV_cfCC(T,A,B) |
Definition at line 1649 of file cfortran.h.
#define ZTRINGV_cfH | ( | S, | |||
U, | |||||
B | ) |
Definition at line 1480 of file cfortran.h.
#define ZTRINGV_cfINT | ( | N, | |||
A, | |||||
B, | |||||
X, | |||||
Y, | |||||
Z | ) | PVOID_cfINT(N,A,B,X,Y,Z) |
Definition at line 1318 of file cfortran.h.
#define ZTRINGV_cfJ | ( | B | ) | STRING_cfJ(B) |
Definition at line 761 of file cfortran.h.
#define ZTRINGV_cfKK | ( | B | ) | STRING_cfKK(B) |
Definition at line 777 of file cfortran.h.
#define ZTRINGV_cfN | ( | T, | |||
A | ) | STRINGV_cfN(T,A) |
Definition at line 835 of file cfortran.h.
#define ZTRINGV_cfS | ( | M, | |||
I, | |||||
A | ) |
Definition at line 1463 of file cfortran.h.
#define ZTRINGV_cfSEP | ( | T, | |||
B | ) | INT_cfSEP(T,B) |
Definition at line 1203 of file cfortran.h.
#define ZTRINGV_cfSTR | ( | N, | |||
T, | |||||
A, | |||||
B, | |||||
C, | |||||
D, | |||||
E | ) | _(CFARGS,N)(T,ZTRINGV,A,B,C,D,E) |
Definition at line 1558 of file cfortran.h.
#define ZTRINGV_cfU | ( | T, | |||
A | ) | char *A |
Definition at line 1342 of file cfortran.h.
#define ZTRINGV_cfV | ( | T, | |||
A, | |||||
B, | |||||
F | ) | STRINGV_cfV(T,A,B,F) |
Definition at line 671 of file cfortran.h.
#define ZTRINGV_cfW | ( | A, | |||
B | ) | STRINGV_cfW(A,B) |
Definition at line 798 of file cfortran.h.
#define ZTRINGV_NUM | ( | I | ) | I |
Definition at line 600 of file cfortran.h.
static char* c2fstrv | ( | char * | cstr, | |
char * | fstr, | |||
int | elem_len, | |||
int | sizeofcstr | |||
) | [static] |
Definition at line 398 of file cfortran.h.
00406 { 00407 int i, j; 00408 /* elem_len includes \0 for C strings. Fortran strings don't have term. \0. 00409 Useful size of string must be the same in both languages. */ 00410 for (i = 0; i < sizeofcstr / elem_len; i++) { 00411 for (j = 1; j < elem_len && *cstr; j++) 00412 *fstr++ = *cstr++; 00413 cstr += 1 + elem_len - j; 00414 for (; j < elem_len; j++) 00415 *fstr++ = ' '; 00416 } /* 95109 - Seems to be returning the original fstr. */ 00417 return fstr - sizeofcstr + sizeofcstr / elem_len; 00418 }
static char* f2cstrv | ( | char * | fstr, | |
char * | cstr, | |||
int | elem_len, | |||
int | sizeofcstr | |||
) | [static] |
Definition at line 422 of file cfortran.h.
00430 { 00431 int i, j; 00432 /* elem_len includes \0 for C strings. Fortran strings don't have term. \0. 00433 Useful size of string must be the same in both languages. */ 00434 cstr += sizeofcstr; 00435 fstr += sizeofcstr - sizeofcstr / elem_len; 00436 for (i = 0; i < sizeofcstr / elem_len; i++) { 00437 *--cstr = '\0'; 00438 for (j = 1; j < elem_len; j++) 00439 *--cstr = *--fstr; 00440 } 00441 return cstr; 00442 }
static char* kill_trailing | ( | char * | s, | |
char | t | |||
) | [static] |
Definition at line 446 of file cfortran.h.
00452 { 00453 char *e; 00454 e = s + strlen(s); 00455 if (e > s) { /* Need this to handle NULL string. */ 00456 while (e > s && *--e == t); /* Don't follow t's past beginning. */ 00457 e[*e == t ? 0 : 1] = '\0'; /* Handle s[0]=t correctly. */ 00458 } 00459 return s; 00460 }
static char* kill_trailingn | ( | char * | s, | |
char | t, | |||
char * | e | |||
) | [static] |
Definition at line 467 of file cfortran.h.
Referenced by vkill_trailing().
00474 { 00475 if (e == s) 00476 *e = '\0'; /* Kill the string makes sense here. */ 00477 else if (e > s) { /* Watch out for neg. length string. */ 00478 while (e > s && *--e == t); /* Don't follow t's past beginning. */ 00479 e[*e == t ? 0 : 1] = '\0'; /* Handle s[0]=t correctly. */ 00480 } 00481 return s; 00482 }
static int num_elem | ( | char * | strv, | |
unsigned | elem_len, | |||
int | term_char, | |||
int | num_term | |||
) | [static] |
Definition at line 535 of file cfortran.h.
00547 { 00548 unsigned num, i; 00549 if (num_term == _NUM_ELEMS || num_term == _NUM_ELEM_ARG) 00550 return term_char; 00551 if (num_term <= 0) 00552 num_term = (int) elem_len; 00553 for (num = 0;; num++) { 00554 for (i = 0; i < (unsigned) num_term && *strv == term_char; i++, strv++); 00555 if (i == (unsigned) num_term) 00556 break; 00557 else 00558 strv += elem_len - i; 00559 } 00560 return (int) num; 00561 }
static char* vkill_trailing | ( | char * | cstr, | |
int | elem_len, | |||
int | sizeofcstr, | |||
char | t | |||
) | [static] |
Definition at line 487 of file cfortran.h.
00495 { 00496 int i; 00497 for (i = 0; i < sizeofcstr / elem_len; i++) /* elem_len includes \0 for C strings. */ 00498 kill_trailingn(cstr + elem_len * i, t, cstr + elem_len * (i + 1) - 1); 00499 return cstr; 00500 }