1 !     eribuf.h
2       INTEGER         LBUF, NBUFS, NIBUF, NBITS, IBIT1, IBIT2
3       LOGICAL         NEWDIS
4       INTEGER         ERIBUFLAST
5 
6       COMMON /ERIBUF/ LBUF, NBUFS, NIBUF, NBITS, IBIT1, IBIT2,          &
7      &                NEWDIS,                                           &
8      &                ERIBUFLAST
9       !  Very important !!!
10       !  Always keep ERIBUFLAST as the last variable in the common block.
11       !  See GETBYTESPAN(firstvar, <name>last, SizeInBytes) for explanation.
12 
13 ! -- end of eribuf.h --
14