/[eiffelstudio]/branches/eth/eve/Src/Eiffel/API/evaluated_type/like_current.e
ViewVC logotype

Diff of /branches/eth/eve/Src/Eiffel/API/evaluated_type/like_current.e

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

revision 70104 by alexk, Tue Aug 14 19:15:39 2007 UTC revision 70105 by manus, Thu Aug 23 21:04:51 2007 UTC
# Line 14  inherit Line 14  inherit
14                          actual_type, associated_class, conform_to, conformance_type, convert_to,                          actual_type, associated_class, conform_to, conformance_type, convert_to,
15                          generics, has_associated_class, instantiated_in,                          generics, has_associated_class, instantiated_in,
16                          is_basic, is_expanded, is_external, is_like_current, is_none, is_reference,                          is_basic, is_expanded, is_external, is_like_current, is_none, is_reference,
17                          meta_type, set_actual_type, type_i, evaluated_type_in_descendant                          meta_type, set_actual_type, type_i, evaluated_type_in_descendant, is_tuple
18                  end                  end
19    
20  feature -- Visitor  feature -- Visitor
# Line 60  feature -- Properties Line 60  feature -- Properties
60                          end                          end
61                  end                  end
62    
63            is_tuple: BOOLEAN is
64                            -- Is type reference?
65                    do
66                            if conformance_type /= Void then
67                                    Result := conformance_type.is_tuple
68                            end
69                    end
70    
71          is_external: BOOLEAN is False          is_external: BOOLEAN is False
72                          -- Is type external?                          -- Is type external?
73    

Legend:
Removed from v.70104  
changed lines
  Added in v.70105

  ViewVC Help
Powered by ViewVC 1.1.23