/[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 18 by grator, Fri Mar 12 17:44:01 1993 UTC revision 236 by grator, Tue Jun 8 12:09:28 1993 UTC
# Line 8  inherit Line 8  inherit
8                  redefine                  redefine
9                          is_reference,                          is_reference,
10                          is_expanded,                          is_expanded,
11                            is_valid,
12                          same_as,                          same_as,
13                          c_type,                          c_type,
14                          instantiation_in                          instantiation_in
# Line 45  feature Line 46  feature
46                          Result := System.class_of_id (base_id);                          Result := System.class_of_id (base_id);
47                  end;                  end;
48    
49            is_valid: BOOLEAN is
50                            -- Is the base class still in the system ?
51                    do
52                            Result := base_class /= Void;
53                    end;
54    
55          is_reference: BOOLEAN is          is_reference: BOOLEAN is
56                          -- Is the type a reference type ?                          -- Is the type a reference type ?
57                  do                  do

Legend:
Removed from v.18  
changed lines
  Added in v.236

  ViewVC Help
Powered by ViewVC 1.1.23