/*
** public domain demo by Bob Stout
*/
#define CAST(new_type,old_object) (*((new_type *)&old_object))
/*************************************************************************
* *
* Example of CAST macro at work *
* *
* union { *
* char ch[4]; *
* int i[2]; *
* } my_union; *
* *
* long longvar; *
* *
* longvar = (long)my_union; Illegal cast *
* longvar = CAST(long, my_union); Legal cast *
* *
*************************************************************************/