/[eiffelstudio]/branches/Eiffel_57_docking/Src/Eiffel/interface/new_graphical/windows/eb_development_window.e
ViewVC logotype

Diff of /branches/Eiffel_57_docking/Src/Eiffel/interface/new_graphical/windows/eb_development_window.e

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

revision 51887 by alexk, Wed Jun 8 12:36:51 2005 UTC revision 52122 by manus, Tue Jun 14 19:30:13 2005 UTC
# Line 2401  feature {NONE} -- Implementation Line 2401  feature {NONE} -- Implementation
2401                          test_stone: CLASSI_STONE                          test_stone: CLASSI_STONE
2402                          conv_ace: ACE_SYNTAX_STONE                          conv_ace: ACE_SYNTAX_STONE
2403                          externali: EXTERNAL_CLASS_I                          externali: EXTERNAL_CLASS_I
                         l_reader: EIFFEL_XML_DESERIALIZER  
2404                          external_cons: CONSUMED_TYPE                          external_cons: CONSUMED_TYPE
2405                          str: STRING                          str: STRING
2406                          dotnet_class: BOOLEAN                          dotnet_class: BOOLEAN
# Line 2516  feature {NONE} -- Implementation Line 2515  feature {NONE} -- Implementation
2515                                                          -- has been dropped, check to see if a .NET class.                                                          -- has been dropped, check to see if a .NET class.
2516                                                  if class_text_exists then                                                  if class_text_exists then
2517                                                          if new_class_stone.class_i.is_external_class then                                                          if new_class_stone.class_i.is_external_class then
                                                                 create l_reader  
2518                                                                  externali ?= new_class_stone.class_i                                                                  externali ?= new_class_stone.class_i
2519                                                                  external_cons ?= l_reader.new_object_from_file (externali.file_name)                                                                  check
2520                                                                            externali_not_void: externali /= Void
2521                                                                    end
2522                                                                    external_cons := externali.external_consumed_type
2523                                                                  if external_cons /= Void then                                                                  if external_cons /= Void then
2524                                                                          -- A .NET class.                                                                          -- A .NET class.
2525                                                                          dotnet_class := True                                                                          dotnet_class := True

Legend:
Removed from v.51887  
changed lines
  Added in v.52122

  ViewVC Help
Powered by ViewVC 1.1.23