/[eiffelstudio]/trunk/eweasel/tests/final132/test0.e
ViewVC logotype

Contents of /trunk/eweasel/tests/final132/test0.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 103153 - (show annotations)
Sun May 12 17:57:18 2019 UTC (5 months ago) by alexk
File size: 446 byte(s)
Added an example to test how removed classes are dealt with storable.
1 class
2 TEST
3
4 create
5 make
6
7 feature {NONE} -- Creation
8
9 make
10 local
11 f: RAW_FILE
12 do
13 create f.make_with_name ("../general.dat")
14 if f.exists then
15 f.delete
16 end
17 f.open_write
18 f.general_store (create {CELL [A]}.put (create {A}))
19 f.close
20 create f.make_with_name ("../independent.dat")
21 if f.exists then
22 f.delete
23 end
24 f.open_write
25 f.independent_store (create {CELL [A]}.put (create {A}))
26 f.close
27 end
28
29 end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23