/[eiffelstudio]/trunk/eweasel/tests/lib010/test.e
ViewVC logotype

Contents of /trunk/eweasel/tests/lib010/test.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 65297 - (show annotations)
Thu Nov 30 20:22:33 2006 UTC (13 years, 3 months ago) by manus
File size: 688 byte(s)
Moved from trunk/Src/eweasel to trunk/eweasel so that a simple checkout of the source code is not penalized by the lenghty process of checking out all the tests of eweasel.
1 indexing
2 description : "System's root class"
3 note : "Initial version automatically generated"
4
5 class
6 TEST
7
8 create
9 make
10
11 feature -- Initialization
12
13 make is
14 --
15 local
16 l_file: like file
17 do
18 create file.make (filename)
19 create l_file.make_create_read_write ("dummy.txt")
20 l_file.put_string ("abcdefgh123456789")
21 l_file.flush
22 l_file.close
23 if file.is_closed and l_file.is_closed then
24 file.append (l_file)
25 file.open_read
26 file.read_stream (file.count)
27 io.put_string (file.last_string)
28 file.close
29 l_file.delete
30 end
31 end
32
33 feature -- Common
34
35 file: PLAIN_TEXT_FILE
36 -- File
37
38 filename: STRING is "file.txt"
39
40
41 end -- class TEST

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23