C++ (Cpp) G77_fgetc_0 Beispiele

Beispiel #1

Datei: fgetc_.c Projekt: janfj/dd-wrt

integer
G77_fget_0 (char *c, const ftnlen Lc)
{
    integer five = 5;

    return G77_fgetc_0 (&five, c, Lc);
}

Beispiel #2

Datei: f2cext.c Projekt: akbertram/egcs-jvm

integer fgetc_ (const integer *lunit, char *c, ftnlen Lc) {
    extern integer G77_fgetc_0 (const integer *lunit, char *c, ftnlen Lc);
    return G77_fgetc_0 (lunit, c, Lc);
}