/***********************************************************************
Test program to check docxref's parsing of ANSI C and other extensions
added to cscan.l
[23-Mar-1990]
***********************************************************************/

unsigned long	unsigned_long_uc = 111UL;
unsigned long	unsigned_long_lc = 222ul;

signed long	signed_long_uc = 333L;
signed long	signed_long_lc = 444l;

unsigned long	unsigned_hex_long_uc = 0X111UL;
unsigned long	unsigned_hex_long_lc = 0x222ul;

signed long	signed_hex_long_uc = 0X333L;
signed long	signed_hex_long_lc = 0x444l;

unsigned long	unsigned_octal_long_uc = 0111UL;
unsigned long	unsigned_octal_long_lc = 0222ul;

signed long	signed_octal_long_uc = 0333L;
signed long	signed_octal_long_lc = 0444l;

int		vax$vms_identifier;
int		vax$$vms_identifier;
int		$hp_apollo_identifier;
int		$$hp_apollo_identifier;

void
trigraphs(a,b)
int a,b;
??<
    char trigraph_string??(??) = "hello";
    char *trigraph_string_pointer = "??/xff";
    char trigraph_char = '??/xee';
    char trigraph_backslash = '??/??/';
    char trigraph_alarm = '??/a';

    a ??' b;
    a ??! b;
    ??- a;
??>

void
no_trigraphs(a,b)
int a,b;
{
    char	string[] = "hello";
    char	*string_pointer = "\xff";
    char	ordinary_char = '\xee';
    char	backslash = '\\';
    char	alarm = '\a';
    a ^ b;
    a | b;
    ~ a;
}


float		float_suffix_lc = 1.111f;
float		float_suffix_uc = 2.222F;

double		double_suffix_lc = 3.333l;
double		double_suffix_uc = 4.444L;

char		wide_char = L'c';
char		hex_char = '\xff';
char		long_hex_char = '\x0123456789abcdefABCDEF';

char		*wide_string = L"wide string";
char		*escape_sequence_string =
			"\'\"\?\\\a\b\f\n\r\t\v\xff\x0123456789abcdefABCDEF";
char		*trigraph_escape_sequence_string =
"??/'??/"??/???/??/??/a??/b??/f??/n??/r??/t??/v??/xff??/x0123456789abcdefABCDEF";

cdecl far fortran huge inline interrupt near noalias pascal signed
	funny_function(void);