]>
Commit | Line | Data |
---|---|---|
fe4da5cc | 1 | #if 0 |
2 | * This pilot patch was created from kernhpx.car patch _khpx | |
3 | * external names with underscore | |
4 | * IEEE floating point | |
5 | * Hollerith constants exist | |
6 | * EQUIVALENCE Hollerith/Character ok | |
7 | * Orthodox Hollerith storage left to right | |
8 | * Internal double-precision | |
9 | * ISA standard routines, ISHFT, IOR, etc | |
10 | * MIL standard routines, IBITS, MVBITS, etc | |
11 | #endif | |
12 | #ifndef CERNLIB_QMHPX | |
13 | #define CERNLIB_QMHPX | |
14 | #endif | |
15 | #if !defined(CERNLIB_QXNO_SC) | |
16 | #ifndef CERNLIB_QX_SC | |
17 | #define CERNLIB_QX_SC | |
18 | #endif | |
19 | #endif | |
20 | #ifndef CERNLIB_QIEEE | |
21 | #define CERNLIB_QIEEE | |
22 | #endif | |
23 | #ifndef CERNLIB_QORTHOLL | |
24 | #define CERNLIB_QORTHOLL | |
25 | #endif | |
26 | #ifndef CERNLIB_INTDOUBL | |
27 | #define CERNLIB_INTDOUBL | |
28 | #endif | |
29 | #ifndef CERNLIB_QISASTD | |
30 | #define CERNLIB_QISASTD | |
31 | #endif | |
32 | #ifndef CERNLIB_QMILSTD | |
33 | #define CERNLIB_QMILSTD | |
34 | #endif | |
35 | #ifndef CERNLIB_QS_UNIX | |
36 | #define CERNLIB_QS_UNIX | |
37 | #endif | |
38 | #ifndef CERNLIB_QGETCWD | |
39 | #define CERNLIB_QGETCWD | |
40 | #endif | |
41 | #ifndef CERNLIB_QSIGPOSIX | |
42 | #define CERNLIB_QSIGPOSIC | |
43 | #endif | |
44 | #ifndef CERNLIB_QINTZERO | |
45 | #define CERNLIB_QINTZERO | |
46 | #endif |