Hello Manoop,

I think here is the main error:

...
invoked from within
“_o14 addr”
(“eval” body line 1)
invoked from within
“eval $node addr $args”
...

The line “eval $node addr $args” tries to invoke the instproc "addr" of
"$node". So what you have to see is

1. The class of $node (whether it is Node, MobileNode, and so on).
2. Track down the instproc addr of that class.

My guess is that the instproc "addr" does not exist for some reasons.
You have to find out why. If you don't need it, then  modify the Tcl
code to remove it. But if you need it, then add instproc addr to the Tcl
file.

If you don't know about how to read the Tcl Error message, you can visit
my blog at
http://ns2ultimate.tumblr.com/post/419191200/tcl-error-message-in-ns2, or
http://t-issariyakul.blogspot.com/2010/02/tcl-error-message-in-ns2_28.html

Also, for more information about Tcl/OTcl, see Chapter 3 and Appendix A
in the following book from Springer:

T. Issaraiyakul and E. Hossain, "Introduction to Network Simulator
NS2", Springer 2008.
http://www.springer.com/engineering/signals/book/978-0-387-71759-3

You may also find the following website useful:
http://www.ece.ubc.ca/~teerawat/NS2.htm


BR,
Best Regards,
Teerawat Issariyakul
http://www.ece.ubc.ca/~teerawat
http://t-issariyakul.blogspot.com
http://ns2ultimate.tumblr.com/ (Beta)



Hello NS Users,

I installed ns2.34 allinone in ubuntu 9.10. And first time, I am trying to
add a new protocol in NS2.
I followed the steps at:
http://masimum.inf.um.es/nsrt-howto/pdf/nsrt-howto.pdf

After applying changes, I did:
$ make clean
$ make

When I run my tcl script then it gives below error. I thought NS2 is not
identifying the new protocol that I added. The new protocol name that I
added is "LVRF" and used the same name in TCL script. TCL script is
attached.
Please guide me to fix the issue.

(_o14 cmd line 1)
invoked from within
“_o14 cmd addr”
invoked from within
“catch “$self cmd $args” ret”
invoked from within
“if [catch "$self cmd $args" ret] {
set cls [$self info class]
global errorInfo
set savedInfo $errorInfo
error “error when calling class $cls: $args” $…”
(procedure “_o14″ line 2)
(SplitObject unknown line 2)
invoked from within
“_o14 addr”
(“eval” body line 1)
invoked from within
“eval $node addr $args”
(“default” arm line 2)
invoked from within
“switch -exact $routingAgent_ {
DSDV {
set ragent [$self create-dsdv-agent $node]
}
DSR {
$self at 0.0 “$node start-dsr”
}
AODV {
set ragent [$self cre..."
(procedure "_o3" line 14)
(Simulator create-wireless-node line 14)
invoked from within
"_o3 create-wireless-node"
("eval" body line 1)
invoked from within
"eval $self create-wireless-node $args"
(procedure "_o3" line 23)
(Simulator node line 23)
invoked from within
"$ns_ node"
("for" body line 2)
invoked from within
"for {set i 0} {$i < $val(nn) } {incr i} {
set node_($i) [$ns_ node]
$node_($i) random-motion 0;
}"
(file "lvrf.tcl" line 63)

--
Regards,
Manoop Talasila
Ph.D. student
CS Dept, NJIT
Email: [email protected]

On 2/23/2010, "manoop talasila" <[email protected]> wrote:

>

Reply via email to