tests/term117/test2.e


--| Copyright (c) 1993-2006 University of Southern California and contributors.
--| All rights reserved.
--| Your use of this work is governed under the terms of the GNU General
--| Public License version 2.

class TEST2 [G -> NUMERIC]

feature
        value: G is
                do
                        Result := x + x
                end

        set_x (val: G) is
                do
                        x := val
                end

        x: G
end
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 TEST2 [G -> NUMERIC]
8
9	feature
10	value: G is
11	do
12	Result := x + x
13	end
14
15	set_x (val: G) is
16	do
17	x := val
18	end
19
20	x: G
21	end
Name	Value
svn:eol-style	native
svn:keywords	Author Date Id Revision