/[eiffelstudio]/trunk/eweasel/tests/incr071/traversable.e
ViewVC logotype

Contents of /trunk/eweasel/tests/incr071/traversable.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 65297 - (show annotations)
Thu Nov 30 20:22:33 2006 UTC (13 years, 2 months ago) by manus
File size: 1690 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
3 description:
4 "Structures for which there exists a traversal policy %
5 %that will visit every element exactly once.";
6
7 status: "See notice at end of class";
8 names: traversable, traversing;
9 access: cursor;
10 contents: generic;
11 date: "$Date$";
12 revision: "$Revision$"
13
14 deferred class
15 TRAVERSABLE [G]
16
17 inherit
18
19 CONTAINER [G]
20
21 feature -- Access
22
23 item: G is
24 -- Item at current position
25 require
26 not_off: not off
27 deferred
28 end;
29
30 feature -- Status report
31
32 off: BOOLEAN is
33 -- Is there no current item?
34 deferred
35 end
36
37 feature -- Cursor movement
38
39 start is
40 -- Move to first position if any.
41 deferred
42 end;
43
44 invariant
45
46 empty_constraint: is_empty implies off;
47
48 end -- class TRAVERSABLE
49
50
51 --|----------------------------------------------------------------
52 --| EiffelBase: Library of reusable components for Eiffel.
53 --| Copyright (c) 1993-2006 University of Southern California and contributors.
54 --| For ISE customers the original versions are an ISE product
55 --| covered by the ISE Eiffel license and support agreements.
56 --| EiffelBase may now be used by anyone as FREE SOFTWARE to
57 --| develop any product, public-domain or commercial, without
58 --| payment to ISE, under the terms of the ISE Free Eiffel Library
59 --| License (IFELL) at http://eiffel.com/products/base/license.html.
60 --|
61 --| Interactive Software Engineering Inc.
62 --| ISE Building, 2nd floor
63 --| 270 Storke Road, Goleta, CA 93117 USA
64 --| Telephone 805-685-1006, Fax 805-685-6869
65 --| Electronic mail <info@eiffel.com>
66 --| Customer support e-mail <support@eiffel.com>
67 --| For latest info see award-winning pages: http://eiffel.com
68 --|----------------------------------------------------------------
69

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23