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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 65297 - (hide annotations)
Thu Nov 30 20:22:33 2006 UTC (13 years, 1 month ago) by manus
File size: 565 byte(s)
Moved from trunk/Src/eweasel to trunk/eweasel so that a simple checkout of the source code is not penalized by the lenghty process of checking out all the tests of eweasel.
1 manus 65296
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    
8     indexing
9    
10     description: "Demonstrates run-time bug in assignment attempt"
11    
12     class TEST
13    
14     creation
15    
16     make
17    
18     feature
19    
20     make is
21     local
22     a1: A1
23     a2: A2
24     b: B2
25     do
26     create b
27     create a1
28     a1.attempt (b)
29     create a2
30     a2.attempt (b)
31     if a1.entity /= Void then
32     print ("Ooops - a1.entity should be Void%N")
33     a1.entity.call1
34     end
35     end
36    
37     end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23