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

Annotation of /trunk/eweasel/tests/exec018/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: 713 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     -- To reproduce error:
8     -- Compile class as is. Finish_freezing (use `gcc'). Execute `test'.
9     -- Produces incorrect output: attribute `b' is not named in
10     -- the Strip list, but it is not included in the array.
11    
12     class
13     TEST
14     creation
15     make
16     feature
17    
18     make is
19     local
20     m: ARRAY [ANY];
21     k: INTEGER;
22     do
23     b := 47;
24     m := strip (a);
25     from
26     k := m.lower;
27     until
28     k > m.upper
29     loop
30     print (m.item (k));
31     k := k + 1;
32     end
33     io.new_line;
34     end;
35    
36     a: INTEGER;
37     b: INTEGER;
38    
39     end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23