Searched refs:stringname (Results 1 – 1 of 1) sorted by relevance
| /libCEED/interface/ |
| H A D | ceed-fortran.c | 54 #define FIX_STRING(stringname) … argument 55 …char Splice(stringname, _c)[1024]; … 56 …if (Splice(stringname, _len) > 1023) *err = CeedError(NULL, 1, "Fortran string length too long %zd… 57 …strncpy(Splice(stringname, _c), stringname, Splice(stringname, _len)); … 58 Splice(stringname, _c)[Splice(stringname, _len)] = 0;
|