[Q] vlan.tcl CVS patch

["Lee Jiwoong" <porce@viscom.kaist.ac.kr>]

Dear

After patching 1.25, 1.26, 1.27, 1.28 vlan.tcl CVS, a topology which includes lan nodes and not-lan nodes
at the same time, ns gives error messages such as:

$ ns m3.main
## Initializing .. 
## Generating Topologies..
0 0
## [Simulating 0 outof 10]
ns: _o169 unknown-flow 1 32787 1 1: 
    (_o169 cmd line 1)
    invoked from within
"_o169 cmd unknown-flow 1 32787 1 1"
    invoked from within
"catch "$self cmd $args" ret"
    (procedure "_o169" line 2)
    (SplitObject unknown line 2)
    invoked from within
"_o169 unknown-flow 1 32787 1 1"


While if I exclude LAN, ns works fine without any error. The working topology is following, and 
not working topology can be made by uncommenting MAKE-LAN code.

# Topologies

### Generating Topology
#   [0]---[1]---[2]
#           \
#           [3]---[4]
#             \
#             [5]  [6]
#              |    |
#              ------
#              |    |
#             [7]  [8]

### Node Generation
puts "## Generating Topologies.."
for {set i 0} {$i <= $NumberOfNodes} {incr i} {
  set n($i) [$ns node]
}

  $ns duplex-link $n(0) $n(1) 1Mb 10ms DropTail
  $ns duplex-link $n(1) $n(2) 1Mb 10ms DropTail
  $ns duplex-link $n(1) $n(3) 1Mb 10ms DropTail
  $ns duplex-link $n(3) $n(4) 1Mb 10ms DropTail
  $ns duplex-link $n(3) $n(5) 1Mb 10ms DropTail

  # Generating Lan
  #$ns make-lan "$n(5) $n(6) $n(7) $n(8)" 10Mbps 5ms LL Queue/DropTail Mac/802_3 Channel

  # Orientation
  $ns duplex-link-op $n(0) $n(1) orient right
  $ns duplex-link-op $n(1) $n(2) orient right
  $ns duplex-link-op $n(1) $n(3) orient right-down
  $ns duplex-link-op $n(3) $n(4) orient right
  $ns duplex-link-op $n(3) $n(5) orient right-down

  # Queue Size
  $ns duplex-link-op $n(0) $n(1) queuePos 0.5
  $ns duplex-link-op $n(1) $n(0) queuePos 0.5
  $ns duplex-link-op $n(3) $n(1) queuePos 0.5




---
 Jiwoong Lee @ KAIST EE