Commit 42d28208 authored by Mike Hibler's avatar Mike Hibler

Accept the magic Emulab-specific bandwidth tokens.

parent f2437487
# -*- tcl -*- # -*- tcl -*-
# #
# Copyright (c) 2000-2011 University of Utah and the Flux Group. # Copyright (c) 2000-2012 University of Utah and the Flux Group.
# #
# {{{EMULAB-LICENSE # {{{EMULAB-LICENSE
# #
...@@ -101,7 +101,11 @@ LTLink instproc set_dst { dst } { ...@@ -101,7 +101,11 @@ LTLink instproc set_dst { dst } {
# use some parsing procs provided by ns. # use some parsing procs provided by ns.
LTLink instproc set_bw { bw } { LTLink instproc set_bw { bw } {
$self instvar bw_ $self instvar bw_
set bw_ [bw_parse $bw] if {"$bw" == "*" || "$bw" == "~"} {
set bw_ 0
} else {
set bw_ [bw_parse $bw]
}
} }
LTLink instproc set_delay { delay } { LTLink instproc set_delay { delay } {
$self instvar delay_ $self instvar delay_
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment