/* ECP: FILEname=fig10_3.c */
/* 1*/   int
/* 2*/   CheckMatch( const Symbol *OpSym, const Symbol *ClSym )
/* 3*/   {
/* 4*/       if( OpSym->Sym == '(' && ClSym->Sym == ')' 
/* 5*/         ||  OpSym->Sym == '[' && ClSym->Sym == ']' 
/* 6*/         ||  OpSym->Sym == '{' && ClSym->Sym == '}' ) 
/* 7*/           return 0;

/* 8*/       printf( "Found %c on line %d;"
/* 9*/               " does not match %c at line %d\n",
/*10*/           ClSym->Sym, ClSym->Line, OpSym->Sym, OpSym->Line );
/*11*/       return 1;
/*12*/   }