Return to d41a.c CVS log

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

Annotation of researchv10no/cmd/lcc/ph/d41a.c, revision 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: #define LIB_TEST 1
        !            11: #include "defs.h"
        !            12: #if !ANSI || !HAS_PROTOTYPES
        !            13: #define SKIP41 1
        !            14: #endif
        !            15: 
        !            16: #include "flags.h"
        !            17: #ifndef SKIP41
        !            18: #include <errno.h>
        !            19: 
        !            20: /*
        !            21:  * 4.1.3 - Errors <errno.h>
        !            22:  */
        !            23: void d4_1_3()
        !            24:        {
        !            25:        extern int errno_init;  /* set in lib.c */
        !            26:        Filename = "d41a.c";
        !            27:        /* make sure that EDOM and ERANGE are macros */
        !            28:        #if !defined(EDOM) || !defined(ERANGE)
        !            29:                complain(__LINE__);
        !            30:        #endif
        !            31: 
        !            32:        /* errno is a modifiable lvalue initialized to 0 */
        !            33:        iequals(__LINE__, errno_init, 0);
        !            34:        errno = 1;
        !            35:        iequals(__LINE__, errno, 1);
        !            36:        errno = 0;
        !            37:        iequals(__LINE__, errno, 0);
        !            38:        inotequals(__LINE__, EDOM, 0);
        !            39:        inotequals(__LINE__, ERANGE, 0);
        !            40:        }
        !            41: #else
        !            42: int skp41a = 1;        /* must have one def */
        !            43: #endif /* SKIP41 */

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