Return to m.h CVS log

Up to [Research Unix] / researchv10no / cmd / lcc / ph

Annotation of researchv10no/cmd/lcc/ph/m.h, revision 1.1.1.1

1.1       root        1: /* The Plum Hall Validation Suite for C
                      2:  * Unpublished copyright (c) 1986-1991, Chiron Systems Inc and Plum Hall Inc.
                      3:  * VERSION: 4
                      4:  * DATE: 1993-01-01
                      5:  * The "ANSI" mode of this suite corresponds to official ANSI C, X3.159-1989.
                      6:  * As per your license agreement, your distribution is not to be moved or copied outside the Designated Site
                      7:  * without specific permission from Plum Hall Inc.
                      8:  */
                      9: 
                     10: CHAR M_c = 0;
                     11: CHAR Mc(){ int i; if (M_c){i=M_c;M_c=0;} else i=7; return (CHAR)i;}
                     12: #if ANSI
                     13: SCHAR M_sc = 0;
                     14: SCHAR Msc(){ int i; if (M_sc){i=M_sc;M_sc=0;} else i=8; return (SCHAR)i;}
                     15: #endif
                     16: SHORT M_s = 0;
                     17: SHORT Ms(){ int i; if (M_s){i=M_s;M_s=0;} else i=9; return (SHORT)i;}
                     18: INT M_i = 0;
                     19: INT Mi(){ int i; if (M_i){i=M_i;M_i=0;} else i=10; return (INT)i;}
                     20: UCHAR M_uc = 0;
                     21: UCHAR Muc(){ int i; if (M_uc){i=M_uc;M_uc=0;} else i=11; return (UCHAR)i;}
                     22: USHORT M_us = 0;
                     23: USHORT Mus(){ int i; if (M_us){i=M_us;M_us=0;} else i=12; return (USHORT)i;}
                     24: UINT M_ui = 0;
                     25: UINT Mui(){ int i; if (M_ui){i=M_ui;M_ui=0;} else i=13; return (UINT)i;}
                     26: LONG M_l = 0;
                     27: LONG Ml(){ int i; if (M_l){i=M_l;M_l=0;} else i=14; return (LONG)i;}
                     28: ULONG M_ul = 0;
                     29: ULONG Mul(){ int i; if (M_ul){i=M_ul;M_ul=0;} else i=15; return (ULONG)i;}
                     30: FLOAT M_f = 0;
                     31: FLOAT Mf(){ int i; if (M_f){i=M_f;M_f=0;} else i=16; return (FLOAT)i;}
                     32: DOUBLE M_d = 0;
                     33: DOUBLE Md(){ int i; if (M_d){i=M_d;M_d=0;} else i=17; return (DOUBLE)i;}
                     34: #if ANSI
                     35: LDOUBLE M_ld = 0;
                     36: LDOUBLE Mld(){ int i; if (M_ld){i=M_ld;M_ld=0;} else i=18; return (LDOUBLE)i;}
                     37: #endif

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