Bug found by:
Submitted by:
Reviewed by:
Approved by:
Obtained from:
# SUCH DAMAGE.
#
-# $Id: eventsched.tcl,v 1.1 2008/06/22 23:29:45 marko Exp $
+# $Id: eventsched.tcl,v 1.2 2008/06/22 23:32:17 marko Exp $
set sched_init_done 0
set target [lindex $event 3]
set params [lrange $event 4 end]
- # XXX only constant values are supported
-
if { $class == "node" } {
# XXX nothing implemented yet
} elseif { $class == "link" } {