Return to d48.c CVS log

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

Annotation of researchv10no/cmd/lcc/ph/d48.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: 
        !            11: #include "flags.h"
        !            12: #ifndef SKIP48
        !            13: #define LIB_TEST 1
        !            14: #include "defs.h"
        !            15: 
        !            16: /*
        !            17:  * 4.8 - Variable arguments <stdarg.h>
        !            18:  * This file is not relevant for pre ANSI C compilers.
        !            19:  */
        !            20: 
        !            21: #if !ANSI
        !            22: void d4_8()
        !            23:        {
        !            24:        }
        !            25: #else
        !            26: 
        !            27: #include <stdarg.h>
        !            28: int d4_8_1(int, ...);
        !            29: 
        !            30: void d4_8()
        !            31:        {
        !            32:        Filename = "d48.c";
        !            33: 
        !            34:        /* make sure that va_start and va_arg are macros */
        !            35:        #if !defined(va_start) || !defined(va_end)
        !            36:                complain(__LINE__);
        !            37:        #endif
        !            38:        iequals(__LINE__, 1, d4_8_1(1, 1, 2, 3));
        !            39:        iequals(__LINE__, 2, d4_8_1(2, 1., 2., 3.));
        !            40:        }
        !            41: 
        !            42: 
        !            43: 
        !            44: 
        !            45: 
        !            46: 
        !            47: 
        !            48: 
        !            49: 
        !            50: 
        !            51: 
        !            52: #if NEW_STYLE_FN_DEF
        !            53: int d4_8_1(int i, ...)
        !            54: #else
        !            55: int d4_8_1(i)
        !            56:        int i;
        !            57: #endif
        !            58:        {
        !            59:        va_list p;
        !            60:        int j;
        !            61: 
        !            62:        va_start(p, i);
        !            63:        for (j = 1; j <= 3; ++j)
        !            64:                {
        !            65:                if (i == 1)
        !            66:                        iequals(__LINE__, j, va_arg(p, int));
        !            67:                else
        !            68:                        dequals(__LINE__, (double)j, va_arg(p, double));
        !            69:                }
        !            70:        va_end(p);
        !            71:        return (i);
        !            72:        }
        !            73: #endif
        !            74: 
        !            75: #else /* if SKIP48 */
        !            76: void d4_8() { pr_skip("d4_8: SKIPPED ENTIRELY\n"); }
        !            77: #endif

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