Return to d42.c CVS log

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

researchv10 Norman

/* The Plum Hall Validation Suite for C
 * Unpublished copyright (c) 1986-1991, Chiron Systems Inc and Plum Hall Inc.
 * VERSION: 4
 * DATE: 1993-01-01
 * The "ANSI" mode of this suite corresponds to official ANSI C, X3.159-1989.
 * As per your license agreement, your distribution is not to be moved or copied outside the Designated Site
 * without specific permission from Plum Hall Inc.
 */


#include "flags.h"
#ifndef SKIP42
#define LIB_TEST 1
/*
 * 4.2 - Diagnostics <assert.h>
 */
#include "defs.h"
#include <assert.h>
#if !ANSI
#include <stdio.h>
#endif
void d4_2();
static void d4_2_1();
#if ANSI
void d4_2_1b();
#endif

/* NDEBUG is not defined by <assert.h>. Force an error if it is */
#if defined(NDEBUG)
	complain(__LINE__);
#endif

void d4_2()
	{
	d4_2_1();
	}
















/*
 * 4.2.1 - Program Diagnostics
 * Since assert() must abort when the argument is FALSE, we can't
 * test that here. We can, however, test that NDEBUG disables it.
 */
static void d4_2_1()
	{
	int i = ivalue(1);
	int j = ivalue(0);

	/* 4.2.1.1 assert */
#if ANSI8712
	/* assert is an expression */
	assert(i == 1), assert(j == 0);
#else
	assert(i == 1);
#endif
#if ANSI
	d4_2_1b();
#endif
	}

#else /* if SKIP42 */
void d4_2() { pr_skip("d4_2: SKIPPED ENTIRELY\n"); }
#endif

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