Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
emulab
emulab-devel
Commits
b624facf
Commit
b624facf
authored
Oct 29, 2002
by
Mac Newbold
Browse files
Change default names to avoid collision but still be legal.
parent
076f2aa0
Changes
1
Hide whitespace changes
Inline
Side-by-side
tbsetup/ns2ir/sim.tcl.in
View file @
b624facf
# -*- tcl -*-
#
# EMULAB-COPYRIGHT
# Copyright
(
c
)
2000-2002 University of Utah and the Flux Group.
...
...
@@ -82,7 +83,7 @@ Simulator instproc node {args} {
punsup
"Arguments for node:
$args
"
}
set curnode node
_
n[incr id_counter]
set curnode
tb
node
-
n
[
incr id_counter
]
Node $curnode $self
# not adding simulated nodes to the node_list
...
...
@@ -108,7 +109,7 @@ Simulator instproc nsenode {args} {
punsup
"Arguments for node:
$args
"
}
set curnode nsenode
_
n[incr id_counter]
set curnode
tb
nsenode
-
n
[
incr id_counter
]
NSENode $curnode $self
# not adding simulated nodes to the node_list
...
...
@@ -186,7 +187,7 @@ Simulator instproc duplex-link {n1 n2 bw delay type args} {
return
""
}
set curlink link
_
l[incr id_counter]
set curlink
tb
link
-
l
[
incr id_counter
]
Link $curlink $self
"
$n1node
$n2node
"
$rbw $rdelay $type
set lanlink_list
(
$curlink
)
{}
...
...
@@ -250,7 +251,7 @@ Simulator instproc make-lan {nodelist bw delay args} {
return
""
}
set curlan lan
_l
[incr id_counter]
set curlan
tb
lan
-lan
[
incr id_counter
]
# Convert bandwidth and delay
set rbw
[
parse_bw $bw
]
...
...
@@ -702,7 +703,7 @@ Simulator instproc rtproto {type args} {
Simulator instproc unknown
{
m args
}
{
$self instvar id_counter
punsup
"Object
$m
"
NullClass null
_n
[incr id_counter] $m
NullClass
tb
null
-null
[
incr id_counter
]
$m
}
# rename_* <old> <new>
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment