output.txt

编译原理全套实验源代码。包括词法分析

RPAREN	)
SEMI	;
KEYWORDS	if
LPAREN	(
IDEN	ch
OPERATOR	==
SLASH	/
RPAREN	)
LBRACKET	{
KEYWORDS	do
LBRACKET	{
IDEN	ch
OPERATOR	=
IDEN	getNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	while
LPAREN	(
IDEN	ch
OPERATOR	!=
IDEN	n
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	else
KEYWORDS	if
LPAREN	(
IDEN	ch
OPERATOR	==
OPERATOR	*
RPAREN	)
LBRACKET	{
IDEN	count
OPERATOR	=
OCT	0;
IDEN	ch
OPERATOR	=
IDEN	getNextChar
LPAREN	(
RPAREN	)
SEMI	;
KEYWORDS	while
LPAREN	(
IDEN	count
OPERATOR	!=
INT	2
RPAREN	)
LBRACKET	{
IDEN	count
OPERATOR	=
OCT	0;
KEYWORDS	while
LPAREN	(
IDEN	ch
OPERATOR	!=
OPERATOR	*
RPAREN	)
IDEN	ch
OPERATOR	=
IDEN	getNextChar
LPAREN	(
RPAREN	)
SEMI	;
IDEN	count
OPERATOR	++
SEMI	;
IDEN	ch
OPERATOR	=
IDEN	getNextChar
LPAREN	(
RPAREN	)
SEMI	;
KEYWORDS	if
LPAREN	(
IDEN	ch
OPERATOR	==
SLASH	/
RPAREN	)
IDEN	count
OPERATOR	++
SEMI	;
KEYWORDS	else
IDEN	ch
OPERATOR	=
IDEN	getNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
RBRACKET	}
KEYWORDS	else
KEYWORDS	if
LPAREN	(
IDEN	ch
OPERATOR	==
OPERATOR	=
RPAREN	)
LBRACKET	{
IDEN	fprintf
LPAREN	(
IDEN	fout
COMMA	,
IDEN	SLASHEQ
IDEN	t
SLASHEQ	/=
IDEN	n
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	else
LBRACKET	{
IDEN	ungetNextChar
LPAREN	(
RPAREN	)
SEMI	;
IDEN	fprintf
LPAREN	(
IDEN	fout
COMMA	,
IDEN	SLASH
IDEN	t
SLASH	/
IDEN	n
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	break
SEMI	;
KEYWORDS	case
OPERATOR	:
KEYWORDS	break
SEMI	;
KEYWORDS	case
OPERATOR	:
KEYWORDS	break
SEMI	;
KEYWORDS	default
OPERATOR	:
KEYWORDS	if
LPAREN	(
IDEN	isSpecial
LPAREN	(
IDEN	ch
RPAREN	)
RPAREN	)
LBRACKET	{
IDEN	scanOperator
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	else
KEYWORDS	if
LPAREN	(
IDEN	ch
OPERATOR	==
IDEN	EOF
RPAREN	)
LBRACKET	{
IDEN	fprintf
LPAREN	(
IDEN	fout
COMMA	,
IDEN	EOF
RPAREN	)
SEMI	;
RBRACKET	}
RBRACKET	}
RBRACKET	}
IDEN	fclose
LPAREN	(
IDEN	fin
RPAREN	)
SEMI	;
IDEN	fclose
LPAREN	(
IDEN	fout
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	int
IDEN	iskeyword
LPAREN	(
RPAREN	)
LBRACKET	{
KEYWORDS	int
IDEN	i
SEMI	;
KEYWORDS	for
LPAREN	(
IDEN	i
OPERATOR	=
OCT	0;
IDEN	i
OPERATOR	<
INT	33
SEMI	;
IDEN	i
OPERATOR	++
RPAREN	)
LBRACKET	{
KEYWORDS	if
LPAREN	(
IDEN	strcmp
LPAREN	(
IDEN	tokenString
COMMA	,
IDEN	keywords
LBRACE	[
IDEN	i
RBRACE	]
RPAREN	)
OPERATOR	==
OCT	0)
KEYWORDS	return
LPAREN	(
IDEN	keytype
LBRACE	[
IDEN	i
RBRACE	]
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	if
LPAREN	(
IDEN	i
OPERATOR	==
IDEN	ID
RPAREN	)
KEYWORDS	return
LPAREN	(
IDEN	ID
RPAREN	)
SEMI	;
KEYWORDS	else
KEYWORDS	return
OPERATOR	-
INT	1
SEMI	;
RBRACKET	}
KEYWORDS	int
IDEN	isOperator
LPAREN	(
RPAREN	)
LBRACKET	{
KEYWORDS	int
IDEN	i
SEMI	;
KEYWORDS	for
LPAREN	(
IDEN	i
OPERATOR	=
OCT	0;
IDEN	i
OPERATOR	<
INT	32
SEMI	;
IDEN	i
OPERATOR	++
RPAREN	)
LBRACKET	{
KEYWORDS	if
LPAREN	(
IDEN	strcmp
LPAREN	(
IDEN	tokenString
COMMA	,
IDEN	operators
LBRACE	[
IDEN	i
RBRACE	]
RPAREN	)
OPERATOR	==
OCT	0)
LBRACKET	{
KEYWORDS	return
LPAREN	(
IDEN	optype
LBRACE	[
IDEN	i
RBRACE	]
OPERATOR	-
INT	50
RPAREN	)
SEMI	;
RBRACKET	}
RBRACKET	}
KEYWORDS	return
OPERATOR	-
INT	1
SEMI	;
RBRACKET	}
KEYWORDS	int
IDEN	isSpecial
LPAREN	(
KEYWORDS	char
IDEN	ch
RPAREN	)
LBRACKET	{
KEYWORDS	switch
LPAREN	(
IDEN	ch
RPAREN	)
LBRACKET	{
KEYWORDS	case
OPERATOR	!
OPERATOR	:
KEYWORDS	case
OPERATOR	%
OPERATOR	:
KEYWORDS	case
OPERATOR	&
OPERATOR	:
KEYWORDS	case
OPERATOR	*
OPERATOR	:
KEYWORDS	case
OPERATOR	?
OPERATOR	:
KEYWORDS	case
OPERATOR	+
OPERATOR	:
KEYWORDS	case
OPERATOR	-
OPERATOR	:
KEYWORDS	case
OPERATOR	:
OPERATOR	:
KEYWORDS	case
OPERATOR	<
OPERATOR	:
KEYWORDS	case
OPERATOR	=
OPERATOR	:
KEYWORDS	case
OPERATOR	>
OPERATOR	:
KEYWORDS	case
OPERATOR	^
OPERATOR	:
KEYWORDS	case
OPERATOR	|
OPERATOR	:
KEYWORDS	case
OPERATOR	~
OPERATOR	:
KEYWORDS	return
IDEN	TRUE
SEMI	;
KEYWORDS	default
OPERATOR	:
KEYWORDS	return
IDEN	FALSE
SEMI	;
RBRACKET	}
RBRACKET	}
IDEN	void
IDEN	scanIdent
LPAREN	(
RPAREN	)
LBRACKET	{
KEYWORDS	int
IDEN	i
OPERATOR	=
OCT	0,
IDEN	t
SEMI	;
KEYWORDS	do
LBRACKET	{
IDEN	tokenString
LBRACE	[
IDEN	i
OPERATOR	++
RBRACE	]
OPERATOR	=
IDEN	ch
SEMI	;
IDEN	ch
OPERATOR	=
IDEN	getNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	while
LPAREN	(
LPAREN	(
LPAREN	(
IDEN	ch
OPERATOR	>=
IDEN	A
RPAREN	)
OPERATOR	&&
LPAREN	(
IDEN	ch
OPERATOR	<=
IDEN	Z
RPAREN	)
RPAREN	)
OPERATOR	||
LPAREN	(
LPAREN	(
IDEN	ch
OPERATOR	>=
IDEN	a
RPAREN	)
OPERATOR	&&
LPAREN	(
IDEN	ch
OPERATOR	<=
IDEN	z
RPAREN	)
RPAREN	)
OPERATOR	||
LPAREN	(
IDEN	ch
OPERATOR	==
IDEN	_
RPAREN	)
OPERATOR	||
LPAREN	(
LPAREN	(
IDEN	ch
OPERATOR	>=
OCT	0'
RPAREN	)
OPERATOR	&&
LPAREN	(
IDEN	ch
OPERATOR	<=
INT	9
RPAREN	)
RPAREN	)
RPAREN	)
SEMI	;
IDEN	tokenString
LBRACE	[
IDEN	i
RBRACE	]
OPERATOR	=
OCT	0'
SEMI	;
KEYWORDS	if
LPAREN	(
IDEN	ch
OPERATOR	!=
IDEN	n
RPAREN	)
LBRACKET	{
IDEN	ungetNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
IDEN	t
OPERATOR	=
IDEN	iskeyword
LPAREN	(
RPAREN	)
SEMI	;
KEYWORDS	if
LPAREN	(
IDEN	t
OPERATOR	<
INT	33
OPERATOR	&&
IDEN	t
OPERATOR	>
OCT	0)
LBRACKET	{
IDEN	fprintf
LPAREN	(
IDEN	fout
COMMA	,
IDEN	KEYWORDS
IDEN	t
OPERATOR	%
IDEN	s
IDEN	n
COMMA	,
IDEN	tokenString
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	if
LPAREN	(
IDEN	t
OPERATOR	==
IDEN	ID
RPAREN	)
LBRACKET	{
IDEN	fprintf
LPAREN	(
IDEN	fout
COMMA	,
IDEN	IDEN
IDEN	t
OPERATOR	%
IDEN	s
IDEN	n
COMMA	,
IDEN	tokenString
RPAREN	)
SEMI	;
RBRACKET	}
RBRACKET	}
IDEN	void
IDEN	scanNum
LPAREN	(
KEYWORDS	int
IDEN	base
RPAREN	)
LBRACKET	{
KEYWORDS	int
IDEN	i
OPERATOR	=
OCT	0;
KEYWORDS	switch
LPAREN	(
IDEN	base
RPAREN	)
LBRACKET	{
KEYWORDS	case
INT	8
OPERATOR	:
IDEN	i
OPERATOR	=
INT	1
SEMI	;
KEYWORDS	do
LBRACKET	{
IDEN	tokenString
LBRACE	[
IDEN	i
OPERATOR	++
RBRACE	]
OPERATOR	=
IDEN	ch
SEMI	;
IDEN	ch
OPERATOR	=
IDEN	getNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	while
LPAREN	(
IDEN	ch
OPERATOR	>=
OCT	0'
OPERATOR	&&
IDEN	ch
OPERATOR	<=
INT	7
RPAREN	)
SEMI	;
IDEN	tokenString
LBRACE	[
IDEN	i
RBRACE	]
OPERATOR	=
OCT	0'
SEMI	;
KEYWORDS	if
LPAREN	(
IDEN	ch
OPERATOR	!=
IDEN	n
RPAREN	)
LBRACKET	{
IDEN	ungetNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
IDEN	fprintf
LPAREN	(
IDEN	fout
COMMA	,
IDEN	OCT
IDEN	t
OPERATOR	%
IDEN	s
IDEN	n
COMMA	,
IDEN	tokenString
RPAREN	)
SEMI	;
KEYWORDS	break
SEMI	;
KEYWORDS	case
INT	16
OPERATOR	:
IDEN	i
OPERATOR	=
INT	2
SEMI	;
KEYWORDS	do
LBRACKET	{
IDEN	tokenString
LBRACE	[
IDEN	i
OPERATOR	++
RBRACE	]
OPERATOR	=
IDEN	ch
SEMI	;
IDEN	ch
OPERATOR	=
IDEN	getNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	while
LPAREN	(
LPAREN	(
IDEN	ch
OPERATOR	>=
OCT	0'
OPERATOR	&&
IDEN	ch
OPERATOR	<=
INT	9
RPAREN	)
OPERATOR	||
LPAREN	(
IDEN	ch
OPERATOR	>=
IDEN	a
OPERATOR	&&
IDEN	ch
OPERATOR	<=
IDEN	f
RPAREN	)
OPERATOR	||
LPAREN	(
IDEN	ch
OPERATOR	>=
IDEN	A
OPERATOR	&&
IDEN	ch
OPERATOR	<=
IDEN	F
RPAREN	)
RPAREN	)
SEMI	;
IDEN	tokenString
LBRACE	[
IDEN	i
RBRACE	]
OPERATOR	=
OCT	0'
SEMI	;
KEYWORDS	if
LPAREN	(
IDEN	ch
OPERATOR	!=
IDEN	n
RPAREN	)
LBRACKET	{
IDEN	ungetNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
IDEN	fprintf
LPAREN	(
IDEN	fout
COMMA	,
IDEN	HEX
IDEN	t
OPERATOR	%
IDEN	s
IDEN	n
COMMA	,
IDEN	tokenString
RPAREN	)
SEMI	;
KEYWORDS	break
SEMI	;
KEYWORDS	default
OPERATOR	:
KEYWORDS	do
LBRACKET	{
IDEN	tokenString
LBRACE	[
IDEN	i
OPERATOR	++
RBRACE	]
OPERATOR	=
IDEN	ch
SEMI	;
IDEN	ch
OPERATOR	=
IDEN	getNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	while
LPAREN	(
IDEN	ch
OPERATOR	>=
OCT	0'
OPERATOR	&&
IDEN	ch
OPERATOR	<=
INT	9
RPAREN	)
SEMI	;
IDEN	tokenString
LBRACE	[
IDEN	i
RBRACE	]
OPERATOR	=
OCT	0'
SEMI	;
KEYWORDS	if
LPAREN	(
IDEN	ch
OPERATOR	!=
IDEN	n
RPAREN	)
LBRACKET	{
IDEN	ungetNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
IDEN	fprintf
LPAREN	(
IDEN	fout
COMMA	,
IDEN	INT
IDEN	t
OPERATOR	%
IDEN	s
IDEN	n
COMMA	,
IDEN	tokenString
RPAREN	)
SEMI	;
RBRACKET	}
RBRACKET	}
IDEN	void
IDEN	scanOperator
LPAREN	(
RPAREN	)
LBRACKET	{
KEYWORDS	int
IDEN	i
OPERATOR	=
OCT	0,
IDEN	t
SEMI	;
KEYWORDS	do
LBRACKET	{
IDEN	tokenString
LBRACE	[
IDEN	i
OPERATOR	++
RBRACE	]
OPERATOR	=
IDEN	ch
SEMI	;
IDEN	ch
OPERATOR	=
IDEN	getNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
KEYWORDS	while
LPAREN	(
IDEN	isSpecial
LPAREN	(
IDEN	ch
RPAREN	)
RPAREN	)
SEMI	;
IDEN	tokenString
LBRACE	[
IDEN	i
RBRACE	]
OPERATOR	=
OCT	0'
SEMI	;
KEYWORDS	if
LPAREN	(
IDEN	ch
OPERATOR	!=
IDEN	n
RPAREN	)
LBRACKET	{
IDEN	ungetNextChar
LPAREN	(
RPAREN	)
SEMI	;
RBRACKET	}
IDEN	t
OPERATOR	=
IDEN	isOperator
LPAREN	(
RPAREN	)
SEMI	;
KEYWORDS	if
LPAREN	(
IDEN	t
OPERATOR	>=
OCT	0 
OPERATOR	&&
IDEN	t
OPERATOR	<
INT	32
RPAREN	)
LBRACKET	{
IDEN	fprintf
LPAREN	(
IDEN	fout
COMMA	,
IDEN	OPERATOR
IDEN	t
OPERATOR	%
IDEN	s
IDEN	n
COMMA	,
IDEN	tokenString
RPAREN	)
SEMI	;
RBRACKET	}
RBRACKET	}