/[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 930 by grator, Sat Aug 27 00:59:35 1994 UTC revision 1204 by grator, Wed Oct 5 00:16:03 1994 UTC
# Line 221  feature {NONE} -- Array optimization Line 221  feature {NONE} -- Array optimization
221                          Result := System.array_class.compiled_class                          Result := System.array_class.compiled_class
222                  end;                  end;
223    
224    feature
225    
226            type_a: CL_TYPE_A is
227                    do
228                            !!Result
229                            Result.set_is_expanded (is_expanded);
230                            Result.set_base_type (base_id)
231                    end
232    
233  end  end

Legend:
Removed from v.930  
changed lines
  Added in v.1204

  ViewVC Help
Powered by ViewVC 1.1.23