include/comis/mdpool.h

0001 #ifndef _MDPOOL_H
0002 #define _MDPOOL_H
0003
0004 /* mdpool.h */
0005
0006 /* #include <comis/mdpool.h> or <comis/mdpool.inc> in one source code file of
0007  * your executable program dynamically linked against libpaw
0008  * so that MDPOOL is defined in your executable.  This is
0009  * necessary for proper functioning of the COMIS interpreter when
0010  * dynamically linked.
0011  */
0012
0013 /* define MDSIZE: */
0014 #include <comis/mdsize.h>
0015
0016 #include <cfortran.h>
0017
0018 #ifdef __cplusplus
0019 extern "C" {
0020 #endif
0021
0022 typedef struct {
0023   int iq[MDSIZE];
0024 } mdpool_def;
0025
0026 #define MDPOOL COMMON_BLOCK(MDPOOL, mdpool)
0027 COMMON_BLOCK_DEF(mdpool_def, MDPOOL);
0028
0029 #ifdef __cplusplus
0030 } /* extern "C" */
0031 #endif
0032
0033 #endif /* _MDPOOL_H */