christoph/fail
1
Fork 0
Code Actions Packages Releases Activity

debuggers: import openocd-0.7.0

Browse Source 
Initial check-in of openocd-0.7.0 as it can be downloaded from
http://sourceforge.net/projects/openocd/files/openocd/0.7.0/

Any modifications will follow.

Change-Id: I6949beaefd589e046395ea0cb80f4e1ab1654d55
This commit is contained in:
Lars Rademacher
2013-10-21 00:50:02 +02:00
parent 85fffe007e
commit 83d72a091e
1148 changed files with 571445 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
debuggers/openocd/jimtcl/examples/dnstest.tcl Normal file
View File

@ -0,0 +1,22 @@
lappend auto_path [pwd]
package require dns
# Use google's DNS
dns::configure -nameserver 8.8.8.8
puts "Resolve with udp"
set tok [dns::resolve www.tcl.tk]
puts status=[dns::status $tok]
puts address=[dns::address $tok]
puts names=[dns::name $tok]
dns::cleanup $tok
# Now with tcp
dns::configure -protocol tcp
puts "Resolve with tcp"
set tok [dns::resolve www.google.com]
puts status=[dns::status $tok]
puts address=[dns::address $tok]
puts names=[dns::name $tok]
dns::cleanup $tok