view testfilewrite.rhope @ 147:f3686f60985d

Sort of working port of framework. Transaction bug seems to be getting in the way. Going to work around, but want the old version in the repo so I can test later.
author Mike Pavone <pavone@retrodev.com>
date Mon, 22 Nov 2010 01:15:02 -0500
parents 2e2e55fc12f9
children
line wrap: on
line source


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