/[eiffelstudio]/branches/eth/eve/eweasel/tests/lib011/test.e
ViewVC logotype

Contents of /branches/eth/eve/eweasel/tests/lib011/test.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 83441 - (show annotations)
Sat Jun 5 13:52:53 2010 UTC (9 years, 7 months ago) by jasonw
File size: 446 byte(s)
Renamed branch eve3 to eve. The eve branch serves as the new branch for the EVE project.
1 indexing
2 description : "System's root class"
3
4 class
5 TEST
6
7 create
8 make
9
10 feature -- Initialization
11
12 make is
13 --
14 do
15 create file.make_open_read (filename)
16 from
17 file.start
18 until
19 file.end_of_file
20 loop
21 file.read_character
22 io.put_string (file.position.out)
23 io.put_new_line
24 end
25 file.close
26 end
27
28 feature -- Common
29
30 file: PLAIN_TEXT_FILE
31 -- File
32
33 filename: STRING is "file.txt"
34
35
36 end -- class TEST

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision

  ViewVC Help
Powered by ViewVC 1.1.23