Hi,
In the error message, I didn't see anything about your 'protoname'. I
guess your code is not activated yet in this run. Maybe you should
rebuilt your whole ns2 package, and re-install it if you're not using
all-in-one package, by running:
make
make install
On Sun, Dec 21, 2008 at 10:16 PM, Nadine Chen wrote:
>
> Hi ns-users
>
> I'm facing a strange problem when adding a new routing protocol:protoname or
> any other new routing protocol:I have compiled successfully my ns2 after
> adding the new protocol . but when I wanted to test it,for example I changed
> in simple-wireless.tcl "set val(rp) DSDV" by "set val(rp)
> Protoname"
> when I tape ns simple-wireless.tcl I have the message below; so please please
> if anyone has faced my problem and succeded to solve it, or if anyone has an
> idea on how to fix this problem, help me because I tried a lot of times to
> solve this problem but I couldn't.Thank you.
>
> num_nodes is set 2
> warning: Please use -channel as shown in tcl/ex/wireless-mitf.tcl
>
> (_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;# disable random motion
> }"
> (file "simple-wireless.tcl" line 93)
>
>
>
>
>
--
Illidan
Networking System Modeler
Northern Capital, Pandaren Empire
http://my.opera.com/illidan