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

Annotation of /trunk/eweasel/tests/ccomp040/native_array.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: 1514 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 indexing
2     description: "[
3     Sequences of values, all of the same type or of a conforming one,
4     accessible through integer indices in a contiguous interval.
5     ]"
6     legal: "See notice at end of class."
7     status: "See notice at end of class."
8     assembly: "mscorlib", "1.0.3300.0", "neutral", "b77a5c561934e089"
9     date: "$Date$"
10     revision: "$Revision$"
11    
12     frozen external class
13     NATIVE_ARRAY [G]
14    
15     inherit
16     SYSTEM_ARRAY
17    
18     create
19     make
20    
21     feature {NONE} -- Initialization
22    
23     make (n: INTEGER) is
24     -- Create an array with `n' elements.
25     do
26     -- Built-in
27     end
28    
29     feature -- Access
30    
31     item, infix "@" (i: INTEGER): G is
32     -- Entry at index `i', if in index interval
33     do
34     -- Built-in
35     end
36    
37     feature -- Measurement
38    
39     upper: INTEGER is
40     -- Maximum index.
41     do
42     Result := count - 1
43     end
44    
45     lower: INTEGER is 0
46     -- Minimum index.
47    
48     count: INTEGER is
49     -- Number of available indices.
50     do
51     -- Built-in
52     end
53    
54     feature -- Element change
55    
56     put (i: INTEGER; v:G) is
57     -- Replace `i'-th entry, if in index interval, by `v'.
58     do
59     -- Built-in
60     end
61    
62     indexing
63     library: "EiffelBase: Library of reusable components for Eiffel."
64     --| Copyright (c) 1993-2006 University of Southern California and contributors.
65     license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
66     source: "[
67     Eiffel Software
68     356 Storke Road, Goleta, CA 93117 USA
69     Telephone 805-685-1006, Fax 805-685-6869
70     Website http://www.eiffel.com
71     Customer support http://support.eiffel.com
72     ]"
73    
74    
75     end -- class NATIVE_ARRAY
76    
77    

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23