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

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

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

revision 27398 by manus, Thu Sep 6 01:22:17 2001 UTC revision 30166 by manus, Fri Jan 11 01:20:32 2002 UTC
# Line 46  feature -- Output Line 46  feature -- Output
46    
47          ext_append_to (st: STRUCTURED_TEXT; f: E_FEATURE) is          ext_append_to (st: STRUCTURED_TEXT; f: E_FEATURE) is
48                  do                  do
49                          st.add (ti_None_class)                          st.add (ti_none_class)
50                  end                  end
51    
52  feature {COMPILER_EXPORTER}  feature {COMPILER_EXPORTER}
# Line 54  feature {COMPILER_EXPORTER} Line 54  feature {COMPILER_EXPORTER}
54          create_info: CREATE_TYPE is          create_info: CREATE_TYPE is
55                          -- Byte code information for entity type creation                          -- Byte code information for entity type creation
56                  do                  do
57                          !! Result                          create Result.make (type_i)
                         Result.set_type (type_i)  
58                  end                  end
59    
60          type_i: NONE_I is          type_i: NONE_I is

Legend:
Removed from v.27398  
changed lines
  Added in v.30166

  ViewVC Help
Powered by ViewVC 1.1.23