indexing description: "[ An EM_GOOF_LOADER_NODE_PROCESSOR to load the EM_GOOF_OBJECT section from xml file. ]" date: "$Date$" revision: "$Revision$" class EM_GOOF_LOADER_OBJECT_NODE_PROCESSOR inherit EM_GOOF_LOADER_NODE_PROCESSOR undefine make end create make feature -- Initialization make is -- Make 'Current' do Precursor Current.register_allowed_subnode ("level", name) end feature -- Access Name: STRING is -- Name of element to process do Result := "object" end Mandatory_attributes: ARRAY [STRING] is -- Table of mandatory attributes once Result := << >> Result.compare_objects end feature -- Basic operations process is -- Process node. do process_subnodes end file: STRING -- String in which the filename is stored end