[ns] Problems with wireless2.tcl from Marc Greis tutorial

[Pradeep Vincent <vincen57@cse.msu.edu>]

hi,
    I tried to run March Greis tutorial example wireless2.tcl and  got
the following error. What am i doing wrong here.

Thanks,

Pradeep Vincent

----------

num_nodes is set 3
warning: Please use -channel as shown in tcl/ex/wireless-mitf.tcl
__FAILED_SHADOW_OBJECT_
    while executing
"error "__FAILED_SHADOW_OBJECT_" """
    (procedure "set-hieraddr" line 4)
    (SplitObject init line 4)
    invoked from within
"set-hieraddr init 1.0.0"
    (Class create line 1)
    invoked from within
"AddrParams create set-hieraddr 1.0.0"
    ("eval" body line 1)
    invoked from within
"eval [list $self] create [list $m] $args         "
    (procedure "AddrParams" line 5)
    (Class unknown line 5)
    invoked from within
"AddrParams set-hieraddr  [$BS(0) node-addr"
    ("for" body line 3)
    invoked from within
"for {set j 0} {$j < $opt(nn)} {incr j} {
    set node_($j) [ $ns_ node [lindex $temp \
            [expr $j+1]] ]
    $node_($j) base-station [AddrParams set..."
    (file "/user/vincen57/cse891/wless/wireless2.tcl" line 138)