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

Contents of /trunk/Src/eweasel/tests/exec136/test.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 65296 - (show annotations)
Thu Nov 30 19:56:25 2006 UTC (13 years, 1 month ago) by manus
File size: 632 byte(s)
Initial revision for the eweasel delivery provided by David Hollenberg
  from the University of Southern California under the GPL v2.0 license.

1
2 --| Copyright (c) 1993-2006 University of Southern California and contributors.
3 --| All rights reserved.
4 --| Your use of this work is governed under the terms of the GNU General
5 --| Public License version 2.
6
7 class TEST
8 create
9 make
10 feature
11 make is
12 local
13 a, retrieved_a: A
14 l_raw: RAW_FILE
15 do
16 create a
17 a.b1.set_i (28)
18 a.b2.set_i (32)
19
20 create l_raw.make_open_write ("toot")
21 l_raw.independent_store (a)
22 l_raw.close
23
24 create l_raw.make_open_read ("toot")
25 retrieved_a ?= l_raw.retrieved
26 l_raw.close
27
28 print (retrieved_a.b1.i); io.new_line
29 print (retrieved_a.b2.i); io.new_line
30 end
31 end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23