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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 96025 - (show annotations)
Fri Oct 31 15:41:08 2014 UTC (5 years, 2 months ago) by manus
File size: 263 byte(s)
Added a new test showing that if we add a new type which forces the TYPE class to add a new generic derivation which will force the class to be melted then the melted code for {TYPE}.default is not valid in the case of a detachable reference type.

1 class TEST
2
3 create
4 make
5
6 feature {NONE} -- Creation
7
8 make
9 local
10 l_type: TYPE [detachable ANY]
11 do
12 l_type := {detachable ANY}
13 if not l_type.has_default or else l_type.default /= Void then
14 io.put_string ("Not OK%N")
15 end
16 end
17
18 $NEW_TYPE
19
20 end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23