Posted to tcl by colin at Thu May 31 07:32:59 GMT 2012view pretty

type messagefile;

app (messagefile t) greeting() {
    echo "Hello, world!" stdout=@filename(t);
}

messagefile outfile <"hello.txt">;

outfile = greeting();