diff options
| author | L Jonas Olsson <ljo@FreeBSD.org> | 1994-10-26 18:15:35 +0000 |
|---|---|---|
| committer | L Jonas Olsson <ljo@FreeBSD.org> | 1994-10-26 18:15:35 +0000 |
| commit | 876f9d834708020dda68772a4812b6143bbbc16e (patch) | |
| tree | 45280e06da0951a884d5b70a23e99bfb495c546e /lib/libI77/typesize.c | |
| parent | 71e0221b877d40a3bc331840e4bba8ff9354f38a (diff) | |
| download | src-876f9d834708020dda68772a4812b6143bbbc16e.tar.gz src-876f9d834708020dda68772a4812b6143bbbc16e.zip | |
Notes
Diffstat (limited to 'lib/libI77/typesize.c')
| -rw-r--r-- | lib/libI77/typesize.c | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/lib/libI77/typesize.c b/lib/libI77/typesize.c new file mode 100644 index 000000000000..1cb20ff2863d --- /dev/null +++ b/lib/libI77/typesize.c @@ -0,0 +1,12 @@ +#include "f2c.h" + +ftnlen f__typesize[] = { 0, 0, sizeof(shortint), sizeof(integer), + sizeof(real), sizeof(doublereal), + sizeof(complex), sizeof(doublecomplex), + sizeof(logical), sizeof(char), + 0, sizeof(integer1), + sizeof(logical1), sizeof(shortlogical), +#ifdef Allow_TYQUAD + sizeof(longint), +#endif + 0}; |