/[eiffelstudio]/branches/CAT_mono/Src/Eiffel/eiffel/interface/tuple_class_b.e
ViewVC logotype

Diff of /branches/CAT_mono/Src/Eiffel/eiffel/interface/tuple_class_b.e

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 69649 by manus, Mon Jul 23 21:36:18 2007 UTC revision 69650 by juliant, Tue Jul 24 17:18:14 2007 UTC
# Line 63  feature -- Actual class type Line 63  feature -- Actual class type
63    
64  feature {CLASS_TYPE_AS} -- Actual class type  feature {CLASS_TYPE_AS} -- Actual class type
65    
66          partial_actual_type (gen: ARRAY [TYPE_A]; is_exp: BOOLEAN; is_sep: BOOLEAN): CL_TYPE_A is          partial_actual_type (gen: ARRAY [TYPE_A]; is_exp, is_sep, is_mono: BOOLEAN): CL_TYPE_A is
67                          -- Actual type of `current depending on the context in which it is declared                          -- Actual type of `current depending on the context in which it is declared
68                          -- in CLASS_TYPE_AS. That is to say, it could have generics `gen' but not                          -- in CLASS_TYPE_AS. That is to say, it could have generics `gen' but not
69                          -- be a generic class. It simplifies creation of `CL_TYPE_A' instances in                          -- be a generic class. It simplifies creation of `CL_TYPE_A' instances in
# Line 83  feature {CLASS_TYPE_AS} -- Actual class Line 83  feature {CLASS_TYPE_AS} -- Actual class
83                          end                          end
84                          if is_expanded then                          if is_expanded then
85                                  Result.set_expanded_class_mark                                  Result.set_expanded_class_mark
86                            elseif is_mono then
87                                    Result.set_monomorph_mark
88                          end                          end
89                  end                  end
90    

Legend:
Removed from v.69649  
changed lines
  Added in v.69650

  ViewVC Help
Powered by ViewVC 1.1.23