sc.txt

tiny 编译器程序的设计 修改了原作者的程序 现在能生成中间代码

{ Sample program in TINY lanuage---computes facotrial}
	read x; {input an integer}
	if 0<x then {don’t compute if x<= 0 }
		fact := 1;
		repeat
			fact := fact * x;
			x := x-1
		until x = 0;
		write fact {output factorial of x}
	end