Ticket #721: test.scm

File test.scm, 42 bytes (added by Alan Post, 13 years ago)

test program with final newline removed.

Line 
1(let ((file (read-string)))
2  (write file)