/* n_26.c:  The name once replaced is not furthur replaced. */

#include    "defs.h"

int     f( a)

    int     a;

{

    return  a;

}

int     g( a)

    int     a;

{

    return  a * 2;

}

main( void)

{

    int     x = 1;

    int     AB = 1;

    int     Z[1];

    fputs( "started\n", stderr);

    Z[0] = 1;

/* 26.1:    Directly recursive object-like macro definition.    */

/*  Z[0];   */

#define Z   Z[0]

    assert( Z == 1);

/* 26.2:    Intermediately recursive object-like macro definition.  */

/*  AB; */

#define AB  BA

#define BA  AB

    assert( AB == 1);

/* 26.3:    Directly recursive function-like macro definition.  */

/*  x + f(x);   */

#define f(a)    a + f(a)

    assert( f( x) == 2);

/* 26.4:    Intermediately recursive function-like macro definition.    */

/*  x + x + g( x);  */

#define g(a)    a + h( a)

#define h(a)    a + g( a)

    assert( g( x) == 4);

/* 26.5:    Rescanning encounters the non-replaced macro name.  */

/*  Z[0] + f( Z[0]);    */

    assert( f( Z) == 2);

    fputs( "success\n", stderr);

    return  0;

}