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

Annotation of /trunk/eweasel/tests/scoop082/test.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 102995 - (hide annotations)
Thu Mar 21 14:28:02 2019 UTC (8 months, 2 weeks ago) by alexk
File size: 487 byte(s)
Added an example for bug#19507.
1 alexk 102995 class TEST
2    
3     create
4     make
5    
6     feature {NONE} -- Creation
7    
8     make
9     -- An feature without arguments but with a separate instruction calling a feature with separate argument.
10     do
11     separate s as t do
12     f (t)
13     end
14     end
15    
16     feature {TEST} -- Test
17    
18     s: separate TEST
19     -- A feature that returns an object of a separate type.
20     do
21     Result := Current
22     end
23    
24     f (t: separate TEST)
25     -- A feature that takes a separate argument.
26     do
27     if t = Current then
28     print ("OK")
29     end
30     end
31    
32     end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23