Main[]
{
	Truncate[File["testwrite.txt"]]
	{ Close[[~]Write[ [Flatten["The quick brown fox jumped over the lazy dog.\n"]]Buffer >> ]] }
	{ Print["Error truncating file"] }
}