class EL_SHARED_DATA_TRANSFER_PROGRESS_LISTENER
Shared file progress listener
note
description: "Shared file progress listener"
author: "Finnian Reilly"
copyright: "Copyright (c) 2001-2017 Finnian Reilly"
contact: "finnian at eiffel hyphen loop dot com"
license: "MIT license (See: en.wikipedia.org/wiki/MIT_License)"
date: "2019-09-24 8:41:23 GMT (Tuesday 24th September 2019)"
revision: "10"
deferred class
EL_SHARED_DATA_TRANSFER_PROGRESS_LISTENER
inherit
EL_ANY_SHARED
feature {NONE} -- Implementation
progress_listener: EL_DATA_TRANSFER_PROGRESS_LISTENER
do
Result := Progress_listener_cell.item
end
is_progress_tracking: BOOLEAN
do
Result := not attached {EL_DEFAULT_DATA_TRANSFER_PROGRESS_LISTENER} progress_listener
end
feature {NONE} -- Constants
Progress_listener_cell: CELL [EL_DATA_TRANSFER_PROGRESS_LISTENER]
once
create Result.put (create {EL_DEFAULT_DATA_TRANSFER_PROGRESS_LISTENER})
end
end