repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
2003-05-14 Eric Christopher <echristo@redhat.com>
[official-gcc.git]
/
libf2c
/
libI77
/
typesize.c
blob
8e2a74ad1957aecfe00591cfd3391ed84900d463
1
#include
"config.h"
2
#include
"f2c.h"
3
4
ftnlen f__typesize
[] = {
0
,
0
,
sizeof
(
shortint
),
sizeof
(
integer
),
5
sizeof
(
real
),
sizeof
(
doublereal
),
6
sizeof
(
complex
),
sizeof
(
doublecomplex
),
7
sizeof
(
logical
),
sizeof
(
char
),
8
0
,
sizeof
(
integer1
),
9
sizeof
(
logical1
),
sizeof
(
shortlogical
),
10
#ifdef Allow_TYQUAD
11
sizeof
(
longint
),
12
#endif
13
0
14
};