[ns] What's wrong with this code?

["임인택 (Intaek Lim)"]

Hello, I just wrote simple tcl script for ns but it did not work.

-----------------

set ns [new Simulator]

set client [$ns node]
set server [$ns node]

$ns duplex-link $client $server 10Mb 10ms DropTail
$ns duplex-link-op $client $server queuePos 0.5

set client_tcp [new Agent/TCP/FullTcp]
set server_tcp [new Agent/TCP/FullTcp]
lappend agents_(source) $client_tcp $server_tcp

$server_tcp listen

$ns attach-agent $client $client_tcp
$ns attach-agent $server $server_tcp

$ns connect $client_tcp $server_tcp
$ns connect $server_tcp $client_tcp

set client_app [new Application]
$client_app attach-agent $client_tcp

set server_app [new Application]
$server_app attach-agent $server_tcp

$client_app start
$server_app start

$client_app send 100

_____________________________________


When I run this script, I get an error like below:


--- Classfier::no-slot{} default handler (tcl/lib/ns-lib.tcl) ---
_o12: no target for slot -1
_o12 type: Classifier/Hash/Dest
content dump:
classifier _o12
0 offset
0 shift
2147483647 mask
1 slots
slot 0: _o30 (Classifier/Port)
-1 default
---------- Finished standard no-slot{} default handler ----------



Please tell me what should I do.


thanks.