/[eiffelstudio]/branches/CAT_mono/Src/Eiffel/eiffel/genericity/cl_type_i.e
ViewVC logotype

Diff of /branches/CAT_mono/Src/Eiffel/eiffel/genericity/cl_type_i.e

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

revision 44032 by manus, Wed Jun 30 04:19:23 2004 UTC revision 44058 by manus, Wed Jun 30 23:08:24 2004 UTC
# Line 223  feature -- Status Line 223  feature -- Status
223                          -- Void element type                          -- Void element type
224                  do                  do
225                          if is_expanded then                          if is_expanded then
                                         -- We only support expanded for external class at the moment.  
226                                  Result := feature {MD_SIGNATURE_CONSTANTS}.Element_type_valuetype                                                                Result := feature {MD_SIGNATURE_CONSTANTS}.Element_type_valuetype                              
227                          else                          else
228                                  if class_id = System.system_string_class.compiled_class.class_id then                                  if class_id = System.system_string_class.compiled_class.class_id then
# Line 278  feature -- Status Line 277  feature -- Status
277                                  -- External classes have only one type.                                  -- External classes have only one type.
278                          Result := is_external                          Result := is_external
279                          if not Result then                          if not Result then
280                                          -- Expanded classes, or classes that inherits from external classes                                          -- Classes that inherits from external classes
281                                          -- have only one generated type.                                          -- have only one generated type.
                                         -- FIXME: Manu 06/28/2004: Expanded cannot yet be generated as single type.  
 --                              Result := is_expanded or base_class.is_single  
282                                  Result := base_class.is_single                                  Result := base_class.is_single
283                          end                          end
284                  end                  end

Legend:
Removed from v.44032  
changed lines
  Added in v.44058

  ViewVC Help
Powered by ViewVC 1.1.23