/[eiffelstudio]/trunk/eweasel/tests/agent006/test1_rev1.e
ViewVC logotype

Contents of /trunk/eweasel/tests/agent006/test1_rev1.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 75065 - (show annotations)
Sat Oct 11 00:28:47 2008 UTC (11 years, 3 months ago) by manus
File size: 495 byte(s)
Forgot to create `Result' in `h'.

1 class TEST1
2
3 feature
4
5 f
6 local
7 a: ANY
8 do
9 a := agent g
10 print (a.generating_type)
11 print ("%N")
12 a := << g >>
13 print (a.generating_type)
14 print ("%N")
15 a := [ g ]
16 print (a.generating_type)
17 print ("%N")
18
19 a := agent h.g
20 print (a.generating_type)
21 print ("%N")
22 a := << h.g >>
23 print (a.generating_type)
24 print ("%N")
25 a := [ h.g ]
26 print (a.generating_type)
27 print ("%N")
28 end
29
30 g: like h
31 do
32 end
33
34 h: TEST1
35 do
36 create Result
37 end
38
39 end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23