include 'go.lm'

parse P: program [stdin]

if !P {
	send stderr "parse error: [error]
	exit(1)
}
else {
	print [P]

	for IL: int_lit in P {
		print "int_lit: [^IL]-
	}
	for RL: rune_lit in P {
		print "rune_lit: [^RL]-
	}
	for SL: string_lit in P {
		print "string_lit: [^SL]-
	}
}