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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 65297 - (hide annotations)
Thu Nov 30 20:22:33 2006 UTC (13 years, 2 months ago) by manus
File size: 800 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     class TEST
8     inherit
9     TEST1
10     rename
11     weasel as infix "@",
12     stoat as infix "@@",
13     ermine as infix "@@@",
14     infix "@@@1" as hamster1,
15     infix "@@@2" as hamster2,
16     infix "@@@3" as hamster3
17     end
18     creation
19     make
20     feature
21     make is
22     do
23     local_try;
24     try;
25     end
26    
27     local_try is
28     do
29     io.put_double (Current @ 13.9); io.new_line;
30     io.put_double (Current @@ 14.9); io.new_line;
31     io.put_double (Current @@@ 15.9); io.new_line;
32     io.put_double (hamster1 (5.9)); io.new_line;
33     io.put_double (hamster2 (6.9)); io.new_line;
34     io.put_double (hamster3 (7.9)); io.new_line;
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