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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 65297 - (show annotations)
Thu Nov 30 20:22:33 2006 UTC (13 years 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
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