documentation fix: (device)

[gregben]

The following example in the documentation is incorrect:

(device (open "myfile" "write")) => 5
(print "This goes in myfile") => "This goes in myfile.dat"
(close (device)) => true

It should be:

(device (open "myfile" "write")) => 5
(print "This goes in myfile") => "This goes in myfile"
(close (device)) => true

note .dat suffix removed from comment on line
starting with (print...

[Lutz]

Just realize, I forgot this in the 8.5.5. It will be corrected in the next release.

Lutz