Return to mconst.c CVS log

Up to [MW Coherent from dump] / coherent / d / usr / lib / libmp

Annotation of coherent/d/usr/lib/libmp/mconst.c, revision 1.1

1.1     ! root        1: #include "mprec.h"
        !             2: 
        !             3: 
        !             4: /*
        !             5:  *     Mzero and mone are pointers to mints with values zero and one
        !             6:  *     respectively.  They are used as convenient constants in various
        !             7:  *     routines.  Mminint and Mmaxint are pointers to mints with value
        !             8:  *     the minimum and maximum integer which will fit into an int.
        !             9:  *     They are used to check for overflow on conversion.  Care should
        !            10:  *     be taken that none of these mints is ever changed.
        !            11:  */
        !            12: static char    __mzero = 0;
        !            13: static mint    _mzero = {1, &__mzero};
        !            14: mint   *mzero = &_mzero;
        !            15: 
        !            16: static char    __mone = 1;
        !            17: static mint    _mone = {1, &__mone};
        !            18: mint   *mone = &_mone;
        !            19: 
        !            20: #ifdef _I386
        !            21: static char    __mminint[] = {   0,    0,    0,    0, 0170, 0177};
        !            22: static char    __mmaxint[] = {0177, 0177, 0177, 0177, 7};
        !            23: static mint    _mminint = {6, __mminint};
        !            24: static mint    _mmaxint = {5, __mmaxint};
        !            25: #else
        !            26: static char    __mminint[] = {0, 0, 0176, 0177};       /* min int (-32768) */
        !            27: static char    __mmaxint[] = {0177, 0177, 1};  /* max int (32767) */
        !            28: static mint    _mminint = {4, __mminint};
        !            29: static mint    _mmaxint = {3, __mmaxint};
        !            30: #endif
        !            31: mint   *mminint = &_mminint;
        !            32: 
        !            33: mint   *mmaxint = &_mmaxint;

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.