mirror of
https://github.com/EiffelSoftware/eiffel-org.git
synced 2025-12-07 15:22:31 +01:00
Changed to read/write character-by-character.
Author:halw Date:2011-01-23T22:33:53.000000Z git-svn-id: https://svn.eiffel.com/eiffel-org/trunk@743 abb3cda0-5349-4a8f-a601-0c33ac3a8c38
This commit is contained in:
@@ -28,13 +28,12 @@ feature {NONE} -- Initialization
|
||||
create output_file.make_open_write ("output.txt")
|
||||
|
||||
from
|
||||
|
||||
input_file.read_character
|
||||
until
|
||||
input_file.exhausted
|
||||
loop
|
||||
input_file.read_line
|
||||
output_file.put_string (input_file.last_string)
|
||||
output_file.new_line
|
||||
output_file.put (input_file.last_character)
|
||||
input_file.read_character
|
||||
end
|
||||
|
||||
input_file.close
|
||||
|
||||
Reference in New Issue
Block a user