lang/fortran/lib/libI77/typesize.c

   1 #include "f2c.h"
   2
   3 ftnlen typesize[] = { 0, 0, sizeof(shortint), sizeof(integer),
   4                         sizeof(real), sizeof(doublereal),
   5                         sizeof(complex), sizeof(doublecomplex),
   6                         sizeof(logical), sizeof(char) };