/test/language/unclassified/woj/aux_woj01_ref.e

 1class AUX_WOJ01_REF
 2
 3inherit
 4   AUX_WOJ01_DEF
 5
 6create {ANY}
 7   make
 8
 9feature {ANY}
10   s: STRING
11
12   make
13      do
14         create s.make(0)
15      end
16
17   set (i: INTEGER)
18      do
19         s := i.out
20      end
21
22end -- class AUX_WOJ01_REF