tests/ccomp040/routine.e

indexing

        description: "[
                Objects representing delayed calls to a routine,
                with some operands possibly still open
                ]"

        status: "See notice at end of class"
        date: "$Date$"
        revision: "$Revision$"

deferred class
        ROUTINE [BASE_TYPE, OPEN_ARGS -> TUPLE]

feature

        frozen operands: OPEN_ARGS 

        callable: BOOLEAN is do end

        valid_operands (args: OPEN_ARGS): BOOLEAN is do end

        open_count: INTEGER

        frozen set_operands (args: OPEN_ARGS) is do end

        call (args: OPEN_ARGS) is do end

        apply is do end

        frozen closed_operands: TUPLE

        closed_count: INTEGER is
                do
                end

        frozen rout_disp: POINTER

        frozen calc_rout_addr: POINTER
        
        frozen open_map: SPECIAL [INTEGER]

        frozen encaps_rout_disp: POINTER

        frozen class_id: INTEGER

        frozen feature_id: INTEGER

        frozen is_precompiled: BOOLEAN is do end

        frozen is_basic: BOOLEAN is
                do
                end

        frozen is_target_closed: BOOLEAN is
                do
                end
        
        frozen is_inline_agent: BOOLEAN is
                do
                end

        frozen flags: INTEGER

        frozen set_rout_disp (a_rout_disp, a_encaps_rout_disp, a_calc_rout_addr: POINTER
                                                  a_class_id, a_feature_id: INTEGER; a_open_map: SPECIAL [INTEGER] 
                                                  a_is_precompiled, a_is_basic, a_is_target_closed, a_is_inline_agent: BOOLEAN
                                                  a_closed_operands: TUPLE; a_open_count: INTEGER) is
                        -- Initialize object.
                do
                end

        frozen set_rout_disp_final (a_rout_disp, a_encaps_rout_disp, a_calc_rout_addr: POINTER
                                                 a_is_target_closed: BOOLEAN; a_closed_operands: TUPLE; a_open_count: INTEGER) is
                        -- Initialize object.
                do
                end

end -- class ROUTINE

1	indexing
2
3	description: "[
4	Objects representing delayed calls to a routine,
5	with some operands possibly still open
6	]"
7
8	status: "See notice at end of class"
9	date: "$Date$"
10	revision: "$Revision$"
11
12	deferred class
13	ROUTINE [BASE_TYPE, OPEN_ARGS -> TUPLE]
14
15	feature
16
17	frozen operands: OPEN_ARGS
18
19	callable: BOOLEAN is do end
20
21	valid_operands (args: OPEN_ARGS): BOOLEAN is do end
22
23	open_count: INTEGER
24
25	frozen set_operands (args: OPEN_ARGS) is do end
26
27	call (args: OPEN_ARGS) is do end
28
29	apply is do end
30
31	frozen closed_operands: TUPLE
32
33	closed_count: INTEGER is
34	do
35	end
36
37	frozen rout_disp: POINTER
38
39	frozen calc_rout_addr: POINTER
40
41	frozen open_map: SPECIAL [INTEGER]
42
43	frozen encaps_rout_disp: POINTER
44
45	frozen class_id: INTEGER
46
47	frozen feature_id: INTEGER
48
49	frozen is_precompiled: BOOLEAN is do end
50
51	frozen is_basic: BOOLEAN is
52	do
53	end
54
55	frozen is_target_closed: BOOLEAN is
56	do
57	end
58
59	frozen is_inline_agent: BOOLEAN is
60	do
61	end
62
63	frozen flags: INTEGER
64
65	frozen set_rout_disp (a_rout_disp, a_encaps_rout_disp, a_calc_rout_addr: POINTER
66	a_class_id, a_feature_id: INTEGER; a_open_map: SPECIAL [INTEGER]
67	a_is_precompiled, a_is_basic, a_is_target_closed, a_is_inline_agent: BOOLEAN
68	a_closed_operands: TUPLE; a_open_count: INTEGER) is
69	-- Initialize object.
70	do
71	end
72
73	frozen set_rout_disp_final (a_rout_disp, a_encaps_rout_disp, a_calc_rout_addr: POINTER
74	a_is_target_closed: BOOLEAN; a_closed_operands: TUPLE; a_open_count: INTEGER) is
75	-- Initialize object.
76	do
77	end
78
79	end -- class ROUTINE
80
Name	Value
svn:eol-style	native
svn:keywords	Author Date Id Revision