/[eiffelstudio]/trunk/eweasel/tests/ccomp040/integer_32_ref.e
ViewVC logotype

Contents of /trunk/eweasel/tests/ccomp040/integer_32_ref.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: 806 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 indexing
2 description: "References to objects containing an integer value coded on 32 bits"
3 status: "See notice at end of class"
4 date: "$Date$"
5 revision: "$Revision$"
6
7 class
8 INTEGER_32_REF
9
10 feature
11
12 infix "+" (other: like Current): like Current is
13 do
14 end
15
16 infix "-" (other: like Current): like Current is
17 do
18 end
19
20 infix "*" (other: like Current): like Current is
21 do
22 end
23
24 infix "/" (other: like Current): DOUBLE is
25 do
26 end
27
28 infix ">" (other: like Current): BOOLEAN is
29 do
30 end
31
32 infix ">=" (other: like Current): BOOLEAN is
33 do
34 end
35
36 prefix "+": like Current is
37 do
38 end
39
40 prefix "-": like Current is
41 do
42 end
43
44 item: INTEGER
45
46 set_item (v: INTEGER) is
47 --
48 do
49
50 end
51
52 feature
53
54 to_reference: INTEGER_REF is
55 do
56 create Result
57 Result.set_item (item)
58 end
59
60
61 end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23