/[eiffelstudio]/FreeELKS/trunk/library/structures/cursors/arrayed_list_cursor.e
ViewVC logotype

Contents of /FreeELKS/trunk/library/structures/cursors/arrayed_list_cursor.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 91424 - (show annotations)
Tue Oct 26 18:39:32 2004 UTC (15 years, 3 months ago) by manus_eiffel
File size: 1420 byte(s)
Initial revision

1 indexing
2
3 description:
4 "Cursors for arrayed lists"
5
6 status: "See notice at end of class"
7 names: fixed_list_cursor, cursor;
8 date: "$Date$"
9 revision: "$Revision$"
10
11 class ARRAYED_LIST_CURSOR inherit
12
13 CURSOR
14
15 create
16 make
17
18 feature {NONE} -- Initialization
19
20 make (current_index: INTEGER) is
21 -- Create a cursor and set it up on `current_index'.
22 do
23 index := current_index
24 end
25
26 feature {ARRAYED_LIST, FIXED_LIST, BINARY_TREE} -- Access
27
28 index: INTEGER;
29 -- Index of current item
30
31 indexing
32
33 library: "[
34 EiffelBase: Library of reusable components for Eiffel.
35 ]"
36
37 status: "[
38 Copyright 1986-2001 Interactive Software Engineering (ISE).
39 For ISE customers the original versions are an ISE product
40 covered by the ISE Eiffel license and support agreements.
41 ]"
42
43 license: "[
44 EiffelBase may now be used by anyone as FREE SOFTWARE to
45 develop any product, public-domain or commercial, without
46 payment to ISE, under the terms of the ISE Free Eiffel Library
47 License (IFELL) at http://eiffel.com/products/base/license.html.
48 ]"
49
50 source: "[
51 Interactive Software Engineering Inc.
52 ISE Building
53 360 Storke Road, Goleta, CA 93117 USA
54 Telephone 805-685-1006, Fax 805-685-6869
55 Electronic mail <info@eiffel.com>
56 Customer support http://support.eiffel.com
57 ]"
58
59 info: "[
60 For latest info see award-winning pages: http://eiffel.com
61 ]"
62
63 end -- class ARRAYED_LIST_CURSOR
64
65
66

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23