fork download
copy 
  1. set interface INTERFACE_AX
  2. set streams 4
  3. set bandwidth BANDWIDTH_ADAPT
  4. set vstaCount 1   
  5. set vstaConfig {{"interface_": "$interface", "txAtten": 0, "streams": $streams, "bandwidth": "$bandwidth"}}
  6. set vstaConfig [subst -nocommands -nobackslashes $vstaConfig]
  7. set vsta_array [lrepeat $vstaCount $vstaConfig]
  8. set vsta_array [join $vsta_array ", "]
  9. puts $vsta_array
Success #stdin #stdout 0.01s 5308KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
{"interface_": "INTERFACE_AX", "txAtten": 0, "streams": 4, "bandwidth": "BANDWIDTH_ADAPT"}
https://ideone.com/VnWH9d
language:
TCL (tcl 8.6)
created:
16 days ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!