note description: "Objects that ..." author: "" date: "$Date$" revision: "$Revision$" class SVN_ENGINE_PROVIDER_THREAD inherit THREAD rename make as thread_make end SHARED_SVN_SORTERS create make feature -- Access make (a_mutex: MUTEX; a_provider: SVN_ENGINE_PROVIDER; a_data: like th_data; a_id: INTEGER) do thread_make th_mutex := a_mutex th_id := a_id th_provider := a_provider th_data := a_data end execute local lst: LIST [SVN_STATUS_INFO] do create internal_svn_engine lst := internal_svn_engine.statuses (th_data.p, th_data.is_verbose_mode, th_data.is_recursive_mode, th_data.is_remote_mode, void) th_mutex.lock th_provider.post_result (th_id, lst) th_mutex.unlock end internal_svn_engine: SVN_ENGINE th_provider: SVN_ENGINE_PROVIDER th_mutex: MUTEX th_id: INTEGER th_data: TUPLE [p: STRING; is_verbose_mode: BOOLEAN; is_recursive_mode: BOOLEAN; is_remote_mode: BOOLEAN] end