roby 0.8.0 → 3.0.0

data/lib/roby/log/gui/replay_controls_ui.rb

@@ -1,249 +0,0 @@
-=begin
-** Form generated from reading ui file 'replay_controls.ui'
-**
-** Created: Mon Jan 25 15:21:37 2010
-**      by: Qt User Interface Compiler version 4.5.3
-**
-** WARNING! All changes made in this file will be lost when recompiling ui file!
-=end
-
-class Ui_ReplayControls
-    attr_reader :actionBookmarksAdd
-    attr_reader :actionGoto
-    attr_reader :actionBookmarksSave
-    attr_reader :actionBookmarksSaveAs
-    attr_reader :actionBookmarksLoad
-    attr_reader :actionBookmarksSetMark
-    attr_reader :vboxLayout
-    attr_reader :grp_play
-    attr_reader :verticalLayout
-    attr_reader :horizontalLayout
-    attr_reader :progress
-    attr_reader :goto
-    attr_reader :time_lcd
-    attr_reader :hboxLayout
-    attr_reader :textLabel1
-    attr_reader :speed
-    attr_reader :slower
-    attr_reader :play
-    attr_reader :faster
-    attr_reader :horizontalLayout_2
-    attr_reader :bookmarks
-    attr_reader :spacerItem
-    attr_reader :gridLayout
-    attr_reader :seek_start
-    attr_reader :play_step
-    attr_reader :play_next_nonempty
-
-    def setupUi(replayControls)
-    if replayControls.objectName.nil?
-        replayControls.objectName = "replayControls"
-    end
-    replayControls.resize(442, 167)
-    @actionBookmarksAdd = Qt::Action.new(replayControls)
-    @actionBookmarksAdd.objectName = "actionBookmarksAdd"
-    @actionGoto = Qt::Action.new(replayControls)
-    @actionGoto.objectName = "actionGoto"
-    @actionGoto.shortcutContext = Qt::ApplicationShortcut
-    @actionBookmarksSave = Qt::Action.new(replayControls)
-    @actionBookmarksSave.objectName = "actionBookmarksSave"
-    @actionBookmarksSave.enabled = false
-    @actionBookmarksSaveAs = Qt::Action.new(replayControls)
-    @actionBookmarksSaveAs.objectName = "actionBookmarksSaveAs"
-    @actionBookmarksSaveAs.enabled = true
-    @actionBookmarksLoad = Qt::Action.new(replayControls)
-    @actionBookmarksLoad.objectName = "actionBookmarksLoad"
-    @actionBookmarksSetMark = Qt::Action.new(replayControls)
-    @actionBookmarksSetMark.objectName = "actionBookmarksSetMark"
-    @vboxLayout = Qt::VBoxLayout.new(replayControls)
-    @vboxLayout.objectName = "vboxLayout"
-    @grp_play = Qt::GroupBox.new(replayControls)
-    @grp_play.objectName = "grp_play"
-    @verticalLayout = Qt::VBoxLayout.new(@grp_play)
-    @verticalLayout.objectName = "verticalLayout"
-    @horizontalLayout = Qt::HBoxLayout.new()
-    @horizontalLayout.objectName = "horizontalLayout"
-    @progress = Qt::ProgressBar.new(@grp_play)
-    @progress.objectName = "progress"
-    @progress.value = 0
-    @progress.orientation = Qt::Horizontal
-
-    @horizontalLayout.addWidget(@progress)
-
-    @goto = Qt::PushButton.new(@grp_play)
-    @goto.objectName = "goto"
-
-    @horizontalLayout.addWidget(@goto)
-
-    @time_lcd = Qt::LCDNumber.new(@grp_play)
-    @time_lcd.objectName = "time_lcd"
-    @time_lcd.numDigits = 6
-    @time_lcd.segmentStyle = Qt::LCDNumber::Flat
-    @time_lcd.setProperty("value", Qt::Variant.new(0))
-
-    @horizontalLayout.addWidget(@time_lcd)
-
-
-    @verticalLayout.addLayout(@horizontalLayout)
-
-    @hboxLayout = Qt::HBoxLayout.new()
-    @hboxLayout.objectName = "hboxLayout"
-    @textLabel1 = Qt::Label.new(@grp_play)
-    @textLabel1.objectName = "textLabel1"
-    @textLabel1.wordWrap = false
-
-    @hboxLayout.addWidget(@textLabel1)
-
-    @speed = Qt::LineEdit.new(@grp_play)
-    @speed.objectName = "speed"
-    @sizePolicy = Qt::SizePolicy.new(Qt::SizePolicy::Minimum, Qt::SizePolicy::Fixed)
-    @sizePolicy.setHorizontalStretch(1)
-    @sizePolicy.setVerticalStretch(0)
-    @sizePolicy.heightForWidth = @speed.sizePolicy.hasHeightForWidth
-    @speed.sizePolicy = @sizePolicy
-    @speed.maximumSize = Qt::Size.new(80, 32767)
-    @speed.alignment = Qt::AlignRight
-
-    @hboxLayout.addWidget(@speed)
-
-    @slower = Qt::PushButton.new(@grp_play)
-    @slower.objectName = "slower"
-
-    @hboxLayout.addWidget(@slower)
-
-    @play = Qt::PushButton.new(@grp_play)
-    @play.objectName = "play"
-    @sizePolicy1 = Qt::SizePolicy.new(Qt::SizePolicy::MinimumExpanding, Qt::SizePolicy::Fixed)
-    @sizePolicy1.setHorizontalStretch(2)
-    @sizePolicy1.setVerticalStretch(0)
-    @sizePolicy1.heightForWidth = @play.sizePolicy.hasHeightForWidth
-    @play.sizePolicy = @sizePolicy1
-    @play.checkable = true
-
-    @hboxLayout.addWidget(@play)
-
-    @faster = Qt::PushButton.new(@grp_play)
-    @faster.objectName = "faster"
-
-    @hboxLayout.addWidget(@faster)
-
-
-    @verticalLayout.addLayout(@hboxLayout)
-
-    @horizontalLayout_2 = Qt::HBoxLayout.new()
-    @horizontalLayout_2.objectName = "horizontalLayout_2"
-    @bookmarks = Qt::ToolButton.new(@grp_play)
-    @bookmarks.objectName = "bookmarks"
-    @bookmarks.popupMode = Qt::ToolButton::InstantPopup
-    @bookmarks.toolButtonStyle = Qt::ToolButtonTextBesideIcon
-    @bookmarks.arrowType = Qt::DownArrow
-
-    @horizontalLayout_2.addWidget(@bookmarks)
-
-    @spacerItem = Qt::SpacerItem.new(101, 20, Qt::SizePolicy::Expanding, Qt::SizePolicy::Minimum)
-
-    @horizontalLayout_2.addItem(@spacerItem)
-
-    @gridLayout = Qt::GridLayout.new()
-    @gridLayout.objectName = "gridLayout"
-    @seek_start = Qt::PushButton.new(@grp_play)
-    @seek_start.objectName = "seek_start"
-
-    @gridLayout.addWidget(@seek_start, 0, 0, 1, 1)
-
-    @play_step = Qt::PushButton.new(@grp_play)
-    @play_step.objectName = "play_step"
-
-    @gridLayout.addWidget(@play_step, 0, 1, 1, 1)
-
-    @play_next_nonempty = Qt::PushButton.new(@grp_play)
-    @play_next_nonempty.objectName = "play_next_nonempty"
-
-    @gridLayout.addWidget(@play_next_nonempty, 1, 0, 1, 2)
-
-
-    @horizontalLayout_2.addLayout(@gridLayout)
-
-
-    @verticalLayout.addLayout(@horizontalLayout_2)
-
-    play_next_nonempty.raise()
-    faster.raise()
-
-    @vboxLayout.addWidget(@grp_play)
-
-
-    retranslateUi(replayControls)
-
-    Qt::MetaObject.connectSlotsByName(replayControls)
-    end # setupUi
-
-    def setup_ui(replayControls)
-        setupUi(replayControls)
-    end
-
-    def retranslateUi(replayControls)
-    replayControls.windowTitle = Qt::Application.translate("ReplayControls", "Form", nil, Qt::Application::UnicodeUTF8)
-    @actionBookmarksAdd.text = Qt::Application.translate("ReplayControls", "Add...", nil, Qt::Application::UnicodeUTF8)
-    @actionGoto.text = Qt::Application.translate("ReplayControls", "goto", nil, Qt::Application::UnicodeUTF8)
-    @actionGoto.shortcut = Qt::Application.translate("ReplayControls", "Shift+G, G", nil, Qt::Application::UnicodeUTF8)
-    @actionBookmarksSave.text = Qt::Application.translate("ReplayControls", "Save", nil, Qt::Application::UnicodeUTF8)
-    @actionBookmarksSaveAs.text = Qt::Application.translate("ReplayControls", "Save As", nil, Qt::Application::UnicodeUTF8)
-    @actionBookmarksLoad.text = Qt::Application.translate("ReplayControls", "Load", nil, Qt::Application::UnicodeUTF8)
-    @actionBookmarksSetMark.text = Qt::Application.translate("ReplayControls", "Set mark", nil, Qt::Application::UnicodeUTF8)
-    @grp_play.title = Qt::Application.translate("ReplayControls", "Play", nil, Qt::Application::UnicodeUTF8)
-    @goto.text = Qt::Application.translate("ReplayControls", "&Goto", nil, Qt::Application::UnicodeUTF8)
-    @textLabel1.text = Qt::Application.translate("ReplayControls", "Speed", nil, Qt::Application::UnicodeUTF8)
-    @speed.toolTip = Qt::Application.translate("ReplayControls", "<html><head><meta name=\"qrichtext\" content=\"1\" /><style type=\"text/css\">\n" \
-"p, li { white-space: pre-wrap; }\n" \
-"</style></head><body style=\" font-family:'Sans Serif'; font-size:9pt; font-weight:400; font-style:normal; text-decoration:none;\">\n" \
-"<p style=\" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;\"><span style=\" font-weight:600;\">Current playing speed</span></p>\n" \
-"<p style=\" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px; font-weight:600;\"><span style=\" font-weight:400;\">it is the factor between the time in the log file and the time of replay. For instance, 2 means that we replay twice as fast as in reality.</span></p>\n" \
-"<p style=\"-qt-paragraph-type:empty; margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;\"></p></body></html>", nil, Qt::Application::UnicodeUTF8)
-    @speed.text = Qt::Application.translate("ReplayControls", "1", nil, Qt::Application::UnicodeUTF8)
-    @slower.toolTip = Qt::Application.translate("ReplayControls", "<html><head><meta name=\"qrichtext\" content=\"1\" /><style type=\"text/css\">\n" \
-"p, li { white-space: pre-wrap; }\n" \
-"</style></head><body style=\" font-family:'Sans Serif'; font-size:9pt; font-weight:400; font-style:normal; text-decoration:none;\">\n" \
-"<p style=\" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;\">Decrease speed</p></body></html>", nil, Qt::Application::UnicodeUTF8)
-    @slower.text = Qt::Application.translate("ReplayControls", "Slower", nil, Qt::Application::UnicodeUTF8)
-    @play.toolTip = Qt::Application.translate("ReplayControls", "<html><head><meta name=\"qrichtext\" content=\"1\" /><style type=\"text/css\">\n" \
-"p, li { white-space: pre-wrap; }\n" \
-"</style></head><body style=\" font-family:'Sans Serif'; font-size:9pt; font-weight:400; font-style:normal; text-decoration:none;\">\n" \
-"<p style=\" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;\">Play</p></body></html>", nil, Qt::Application::UnicodeUTF8)
-    @play.text = Qt::Application.translate("ReplayControls", "Play", nil, Qt::Application::UnicodeUTF8)
-    @faster.toolTip = Qt::Application.translate("ReplayControls", "<html><head><meta name=\"qrichtext\" content=\"1\" /><style type=\"text/css\">\n" \
-"p, li { white-space: pre-wrap; }\n" \
-"</style></head><body style=\" font-family:'Sans Serif'; font-size:9pt; font-weight:400; font-style:normal; text-decoration:none;\">\n" \
-"<p style=\" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;\">Increase speed</p></body></html>", nil, Qt::Application::UnicodeUTF8)
-    @faster.text = Qt::Application.translate("ReplayControls", "Faster", nil, Qt::Application::UnicodeUTF8)
-    @bookmarks.text = Qt::Application.translate("ReplayControls", "Bookmarks", nil, Qt::Application::UnicodeUTF8)
-    @seek_start.toolTip = Qt::Application.translate("ReplayControls", "<html><head><meta name=\"qrichtext\" content=\"1\" /><style type=\"text/css\">\n" \
-"p, li { white-space: pre-wrap; }\n" \
-"</style></head><body style=\" font-family:'Sans Serif'; font-size:9pt; font-weight:400; font-style:normal; text-decoration:none;\">\n" \
-"<p style=\" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;\">Go to start</p></body></html>", nil, Qt::Application::UnicodeUTF8)
-    @seek_start.text = Qt::Application.translate("ReplayControls", "Go To Beginning", nil, Qt::Application::UnicodeUTF8)
-    @seek_start.shortcut = ''
-    @play_step.toolTip = Qt::Application.translate("ReplayControls", "<html><head><meta name=\"qrichtext\" content=\"1\" /><style type=\"text/css\">\n" \
-"p, li { white-space: pre-wrap; }\n" \
-"</style></head><body style=\" font-family:'Sans Serif'; font-size:9pt; font-weight:400; font-style:normal; text-decoration:none;\">\n" \
-"<p style=\" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;\">Go forward one step</p></body></html>", nil, Qt::Application::UnicodeUTF8)
-    @play_step.text = Qt::Application.translate("ReplayControls", "Step", nil, Qt::Application::UnicodeUTF8)
-    @play_next_nonempty.toolTip = Qt::Application.translate("ReplayControls", "<html><head><meta name=\"qrichtext\" content=\"1\" /><style type=\"text/css\">\n" \
-"p, li { white-space: pre-wrap; }\n" \
-"</style></head><body style=\" font-family:'Sans Serif'; font-size:9pt; font-weight:400; font-style:normal; text-decoration:none;\">\n" \
-"<p style=\" margin-top:0px; margin-bottom:0px; margin-left:0px; margin-right:0px; -qt-block-indent:0; text-indent:0px;\">Go to start</p></body></html>", nil, Qt::Application::UnicodeUTF8)
-    @play_next_nonempty.text = Qt::Application.translate("ReplayControls", "Play next non-empty cycle", nil, Qt::Application::UnicodeUTF8)
-    @play_next_nonempty.shortcut = ''
-    end # retranslateUi
-
-    def retranslate_ui(replayControls)
-        retranslateUi(replayControls)
-    end
-
-end
-
-module Ui
-    class ReplayControls < Ui_ReplayControls
-    end
-end  # module Ui
-

data/lib/roby/log/gui/runtime.rb

@@ -1,130 +0,0 @@
-require 'Qt4'
-require 'roby/app'
-
-require 'roby/log/gui/replay_controls_ui'
-require 'roby/log/gui/data_displays'
-require 'roby/log/server'
-
-class RemoteStreamListModel < DataStreamListModel
-    attr_reader :known_servers
-    def initialize(streams)
-	super
-	@known_servers = []
-    end
-
-    # Update the list of available servers and streams
-    def update
-	Roby::Log::Server.available_servers.each do |server|
-	    unless known_servers.find { |str| str.server == server }
-		begin
-		    known_servers << Roby::Log::Client.new(server)
-		rescue DRb::DRbConnError
-		end
-	    end
-	end
-
-	known_servers.delete_if { |s| !s.connected? }
-
-	found_streams = []
-	known_servers.delete_if do |server|
-	    begin
-		server.streams.each do |stream|
-		    found_streams << stream
-		    unless streams.include?(stream)
-			server.subscribe(stream)
-			add_new(stream)
-		    end
-		end
-		false
-	    rescue DRb::DRbConnError
-		s.disconnect
-		true
-	    end
-	end
-
-	(streams - found_streams).each do |s|
-	    row = streams.index(s)
-	    removeRow(row, Qt::ModelIndex.new)
-	end
-    end
-end
-
-class RuntimeDisplay < Qt::MainWindow
-    attr_reader :ui_displays
-
-    attr_reader :streams
-    attr_reader :streams_model
-
-    DISPLAY_MINIMUM_DURATION = 5
-
-    def initialize(broadcast, port, period)
-	super()
-
-	# Create the vertical layout for this window
-	central_widget = Qt::Widget.new(self)
-	self.central_widget = central_widget
-	layout = Qt::VBoxLayout.new(central_widget)
-	layout.spacing = 6
-	layout.margin  = 0
-
-	# add GUI for the data streams and display setup
-	@streams	= Array.new
-	@streams_model  = RemoteStreamListModel.new(streams)
-	displays_holder = Qt::Widget.new(central_widget)
-	layout.add_widget displays_holder
-	@ui_displays = Ui_DataDisplays.new
-	ui_displays.setupUi(displays_holder)
-	ui_displays.streams.model = streams_model
-	ui_displays.add_stream.enabled = false
-	ui_displays.remove_stream.enabled = false
-	connect(ui_displays.display_add, SIGNAL("clicked()"), self, SLOT("add_display()"))
-
-	# Set up the stream discovery
-	Roby::Log::Server.enable_discovery(broadcast, port, period)
-
-	# This timer is used to call Thread.pass ... of course needed or Ruby
-	# threads won't be woken up
-	Thread.current.priority = -1
-
-	@threads_timer = Qt::Timer.new(self)
-	connect(@threads_timer, SIGNAL('timeout()')) do
-	    Thread.pass
-	end
-	@threads_timer.start(50)
-
-	@display_timer = Qt::Timer.new(self)
-	connect(@display_timer, SIGNAL('timeout()')) do
-	    streams.each do |s|
-		s.synchronize do
-		    s.display
-		end
-	    end
-	end
-	@display_timer.start(5000)
-
-	sleep(0.5)
-	streams_model.update
-
-	@discovery_timer = Qt::Timer.new(self)
-	connect(@discovery_timer, SIGNAL('timeout()')) do
-	    streams_model.update
-	end
-	@discovery_timer.start(Integer(period * 1000))
-    end
-
-    def add_display(kind = nil)
-	ui_displays.add_display(streams_model, kind)
-    end
-    slots 'add_display()'
-end
-
-if $0 == __FILE__
-    DRb.start_service "druby://:0"
-    Roby::Log::Server.logger.level = Logger::DEBUG
-
-    a = Qt::Application.new(ARGV)
-    w = RuntimeDisplay.new('localhost', Roby::Log::Server::RING_PORT, 5)
-    w.show
-    a.exec
-end
-

data/lib/roby/log/hooks.rb

@@ -1,186 +0,0 @@
-require 'roby/log/logger'
-require 'roby'
-
-module Roby::Log
-    module BasicObjectHooks
-	HOOKS = %w{added_owner removed_owner}
-
-	def added_owner(peer)
-	    super if defined? super
-	    Roby::Log.log(:added_owner) { [self, peer] }
-	end
-
-	def removed_owner(peer)
-	    super if defined? super
-	    Roby::Log.log(:removed_owner) { [self, peer] }
-	end
-    end
-    Roby::BasicObject.include BasicObjectHooks
-
-    module TaskHooks
-	HOOKS = %w{added_task_child removed_task_child}
-
-	def added_child_object(child, relations, info)
-	    super if defined? super
-	    Roby::Log.log(:added_task_child) { [self, relations, child, info] }
-	end
-
-	def removed_child_object(child, relations)
-	    super if defined? super
-	    Roby::Log.log(:removed_task_child) { [self, relations, child] }
-	end
-    end
-    Roby::Task.include TaskHooks
-
-    module PlanHooks
-	HOOKS = %w{
-            added_mission unmarked_mission
-            added_permanent unmarked_permanent
-            added_tasks added_events finalized_task finalized_event
-            replaced_tasks garbage_task added_transaction removed_transaction}
-
-	def added_mission(tasks)
-	    super if defined? super
-	    Roby::Log.log(:added_mission) { [self, tasks] }
-	end
-	def unmarked_mission(tasks)
-	    super if defined? super
-	    Roby::Log.log(:unmarked_mission) { [self, tasks] }
-	end
-	def replaced(from, to)
-	    super if defined? super
-	    Roby::Log.log(:replaced_tasks) { [self, from, to] }
-	end
-	def added_events(tasks)
-	    super if defined? super
-	    Roby::Log.log(:added_events) { [self, tasks] }
-	end
-	def added_tasks(tasks)
-	    super if defined? super
-	    Roby::Log.log(:added_tasks) { [self, tasks] }
-	end
-	def garbage(task)
-	    super if defined? super
-	    Roby::Log.log(:garbage_task) { [self, task] }
-	end
-	def finalized_event(event)
-	    super if defined? super
-	    Roby::Log.log(:finalized_event) { [self, event] }
-	end
-	def finalized_task(task)
-	    super if defined? super
-	    Roby::Log.log(:finalized_task) { [self, task] }
-	end
-
-	def added_transaction(trsc)
-	    super if defined? super
-	    Roby::Log.log(:added_transaction) { [self, trsc] }
-	end
-	def removed_transaction(trsc)
-	    super if defined? super
-	    Roby::Log.log(:removed_transaction) { [self, trsc] }
-	end
-    end
-    Roby::Plan.include PlanHooks
-
-    module TransactionHooks
-	HOOKS = %w{committed_transaction discarded_transaction}
-
-	def committed_transaction
-	    super if defined? super
-	    Roby::Log.log(:committed_transaction) { [self] }
-	end
-	def discarded_transaction
-	    super if defined? super
-	    Roby::Log.log(:discarded_transaction) { [self] }
-	end
-    end
-    Roby::Transaction.include TransactionHooks
-
-    module EventGeneratorHooks
-	HOOKS = %w{added_event_child removed_event_child 
-		   generator_calling generator_called generator_fired
-		   generator_signalling generator_forwarding generator_emitting
-		   generator_postponed}
-
-	def added_child_object(to, relations, info)
-	    super if defined? super
-	    Roby::Log.log(:added_event_child) { [self, relations, to, info] }
-	end
-
-	def removed_child_object(to, relations)
-	    super if defined? super
-	    Roby::Log.log(:removed_event_child) { [self, relations, to] }
-	end
-
-	def calling(context)
-	    super if defined? super
-	    Roby::Log.log(:generator_calling) { [self, plan.engine.propagation_source_generators, context.to_s] }
-	end
-
-	def called(context)
-	    super if defined? super
-	    Roby::Log.log(:generator_called) { [self, context.to_s] }
-	end
-
-	def fired(event)
-	    super if defined? super
-	    Roby::Log.log(:generator_fired) { [self, event.object_id, event.time, event.context.to_s] }
-	end
-
-	def signalling(event, to)
-	    super if defined? super
-	    Roby::Log.log(:generator_signalling) { [false, self, to, event.object_id, event.time, event.context.to_s] }
-	end
-
-	def emitting(context)
-	    super if defined? super
-	    Roby::Log.log(:generator_emitting) { [self, plan.engine.propagation_source_generators, context.to_s] }
-	end
-
-	def forwarding(event, to)
-	    super if defined? super
-	    Roby::Log.log(:generator_forwarding) { [true, self, to, event.object_id, event.time, event.context.to_s] }
-	end
-
-	def postponed(context, generator, reason)
-	    super if defined? super 
-	    Roby::Log.log(:generator_postponed) { [self, context.to_s, generator, reason.to_s] }
-	end	
-    end
-    Roby::EventGenerator.include EventGeneratorHooks
-
-    module ExecutionHooks
-	HOOKS = %w{cycle_end}
-
-	def cycle_end(timings)
-	    super if defined? super
-	    Roby::Log.log(:cycle_end) { [timings] }
-	end
-
-	module ClassExtension
-	    HOOKS = %w{fatal_exception handled_exception}
-
-	    def fatal_exception(error, tasks)
-		super if defined? super
-		Roby::Log.log(:fatal_exception) { [error.exception, tasks] }
-	    end
-	    def handled_exception(error, task)
-		super if defined? super
-		Roby::Log.log(:handled_exception) { [error.exception, task] }
-	    end
-	end
-    end
-    Roby::ExecutionEngine.include ExecutionHooks
-
-    def self.each_hook
-	[TransactionHooks, BasicObjectHooks, TaskHooks,
-	    PlanHooks, EventGeneratorHooks, ExecutionHooks,
-	    ExecutionHooks::ClassExtension].each do |klass|
-		klass::HOOKS.each do |m|
-		    yield(klass, m.to_sym)
-		end
-	    end
-    end
-end
-