The API of PRInputDocument is not that good

[Ducasse]

includedPillarAST := ((PRInputDocument inputClassForFile: includedFile) new
					"project: aProject;"
					file: includedFile contents;
					yourself) parsedDocument.

file: should expect a file reference and the parseDocument should do what it should. Then inputClassForFile: should not be exposed.

[Ducasse]

introduced forFile: instance creation method.