]>
Commit | Line | Data |
---|---|---|
fe4da5cc | 1 | #if 0 |
2 | * This pilot for Windows NT for Microsoft Powersation Fortran v.4.0 | |
3 | #endif | |
4 | ||
5 | #ifdef CERNLIB_WINNT | |
6 | #ifndef CERNLIB_QS_WNT | |
7 | #define CERNLIB_QS_WNT | |
8 | #endif | |
9 | #endif | |
10 | ||
11 | #ifndef CERNLIB_QS_DOS | |
12 | #define CERNLIB_QS_DOS | |
13 | #endif | |
14 | ||
15 | #ifndef CERNLIB_QMDOS | |
16 | #define CERNLIB_QMDOS | |
17 | #endif | |
18 | ||
19 | #ifndef CERNLIB_QIEEE | |
20 | #define CERNLIB_QIEEE | |
21 | #endif | |
22 | ||
23 | #ifndef CERNLIB_QISASTD | |
24 | #define CERNLIB_QISASTD | |
25 | #endif | |
26 | ||
27 | #ifndef CERNLIB_QMILSTD | |
28 | #define CERNLIB_QMILSTD | |
29 | #endif | |
30 | ||
31 | #ifdef CERNLIB_QORTHOLL | |
32 | #undef CERNLIB_QORTHOLL | |
33 | #endif | |
34 | ||
35 | #ifndef CERNLIB_F77TRARG | |
36 | #define CERNLIB_F77TRARG | |
37 | #endif | |
38 | ||
39 | #ifndef CERNLIB_QCFIO | |
40 | #define CERNLIB_QCFIO | |
41 | #endif | |
42 | ||
43 | #ifndef CERNLIB_QGETCWD | |
44 | #define CERNLIB_QGETCWD | |
45 | #endif | |
46 | ||
47 | #ifndef CERNLIB_QINTCOPY | |
48 | #define CERNLIB_QINTCOPY | |
49 | #endif | |
50 | ||
51 | #ifndef CERNLIB_QINTZERO | |
52 | #define CERNLIB_QINTZERO | |
53 | #endif | |
54 | ||
55 | #include "fortranc.h" |