File indexing completed on 2025-02-21 10:04:38
0001 #if 0
0002 * for SUN
0003 * This pilot patch was created from kernsun.car patch _ksun
0004 * This directory was created from kernsun.car patch qmsun
0005 * This directory was created from kernfor.car patch qmsun
0006 * Normal Unix system machine
0007 * IEEE floating point
0008 * external names with underscore
0009 * Hollerith constants exist
0010 * EQUIVALENCE Hollerith/Character ok
0011 * Orthodox Hollerith storage left to right
0012 * Internal double-precision
0013 * signal handling with Posix sigaction
0014 * running Unix
0015 #endif
0016
0017 #if !defined(CERNLIB_SOLARIS)
0018 #if 0
0019 CERNLIB_BUGLRSHFT to get round the lrshft bug in Sun f77 3.0.x
0020 #endif
0021 #define CERNLIB_BUGLRSHFT
0022 #endif
0023
0024 #ifndef CERNLIB_QMSUN
0025 #define CERNLIB_QMSUN
0026 #endif
0027
0028 #ifndef CERNLIB_QIEEE
0029 #define CERNLIB_QIEEE
0030 #endif
0031
0032 #ifndef CERNLIB_QX_SC
0033 #define CERNLIB_QX_SC
0034 #endif
0035
0036 #ifndef CERNLIB_QORTHOLL
0037 #define CERNLIB_QORTHOLL
0038 #endif
0039
0040 #ifndef CERNLIB_INTDOUBL
0041 #define CERNLIB_INTDOUBL
0042 #endif
0043
0044 #ifndef CERNLIB_QSIGPOSIX
0045 #define CERNLIB_QSIGPOSIX
0046 #endif
0047
0048 #if defined(CERNLIB_SOLARIS)
0049
0050 #ifndef CERNLIB_QSIGJMP
0051 #define CERNLIB_QSIGJMP
0052 #endif
0053
0054 #ifndef CERNLIB_QGETCWD
0055 #define CERNLIB_QGETCWD
0056 #endif
0057
0058 #ifndef CERNLIB_QSIGPOSIX
0059 #define CERNLIB_QSIGPOSIX
0060 #endif
0061
0062 #ifdef CERNLIB_QSYSBSD
0063 #undef CERNLIB_QSYSBSD
0064 #endif
0065
0066 #ifdef CERNLIB_QENVBSD
0067 #undef CERNLIB_QENVBSD
0068 #endif
0069
0070 #endif
0071
0072 #ifndef CERNLIB_QS_UNIX
0073 #define CERNLIB_QS_UNIX
0074 #endif
0075
0076 #ifndef CERNLIB_QINTZERO
0077 #define CERNLIB_QINTZERO
0078 #endif
