[Ns-developers] Bug report in ns-2.33/tcl/lib/ns-link.tcl

[Pascal ANELLI]

Hello

in function insert-linkloss

This function doesn't work because LinkDelay::recv make a callback (at 
the end of txt) to QueueHandler::handle  and this last one calls 
queue_.resume();

an errormoduel doesn't do that.  It is the reason why this function 
doesn't work.

I propose to add the errmodule after the link_ object. This becomes:

@@ -563,7 +563,7 @@
  # in the queue
  #
  SimpleLink instproc insert-linkloss args {
-       $self instvar link_errmodule_ queue_ drophead_ deqT_
+       $self instvar link_errmodule_ queue_ drophead_ link_
         if { $args == "" } {
                 return $link_errmodule_
         }
@@ -574,13 +574,8 @@
         }
         set link_errmodule_ $em

-        if [info exists deqT_] {
-                $em target [$deqT_ target]
-                $deqT_ target $em
-        } else {
-                $em target [$queue_ target]
-                $queue_ target $em
-        }
+        $em target [$link_ target]
+        $link_ target $em

         $em drop-target $drophead_
  }



Thank you sincerely

P ANELLI


-- 
                                       '''
                                      (o -)
---------------------------------oOO--(-)--OOo--------------------------
                         Pascal ANELLI --- Associate Professor
      Université de la Réunion          |  Tel: 262 (0)2 62 48 33 12
         LIM    - BP 7151               |  fax: 262 (0)2 62 48 33 91
        2 rue Joseph Wetzel             |  skype: panelli974
        97490 Sainte Clotilde           |  Office: B23.3
           FRANCE
            __o          E-mail    : Pascal.Anelli at univ-reunion.fr
          _'\<,_         Web page  : 
http://personnel.univ-reunion.fr/panelli
  ~~~~~~ (_)/_(_)        Ressources: 
ftp://iremia.univ-reunion.fr/pub/panelli
--------------------------------(__)------(__)--------------------------