debuggers: import openocd-0.7.0

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

debuggers/openocd/jimtcl/tests/exprsugar.test

@@ -0,0 +1,52 @@
+source [file dirname [info script]]/testing.tcl
+
+needs constraint jim
+
+# Test the expr-sugar syntax: $(...)
+
+test exprsugar-1.1 {Simple operations} {
+	set x $(2)
+} 2
+test exprsugar-1.2 {Simple operations} {
+	set x $(-3)
+} -3
+test exprsugar-1.3 {Simple operations} {
+	set x $(!0)
+} 1
+test exprsugar-1.4 {Simple operations} {
+	set a 3
+	set x $($a)
+} 3
+test exprsugar-1.5 {Simple operations} {
+	set x $($a + 4)
+} 7
+test exprsugar-1.6 {Simple operations} {
+	set x $(6 * 7 + 2)
+} 44
+test exprsugar-1.7 {Simple operations} {
+	set a bb
+	set x $($a in {aa bb cc})
+} 1
+test exprsugar-1.8 {Simple operations} {
+	set a 1
+	set x $($a ? "yes" : "no")
+} yes
+test exprsugar-1.9 {Simple operations} {
+	set a 1
+	set x $([incr a])
+	list $a $x
+} {2 2}
+# expr sugar inside an expression is an error
+test exprsugar-1.10 {Simple operations} {
+	catch {set x $(1 + $(5 * 7))}
+} 1
+test exprsugar-1.11 {Simple operations} {
+	unset a
+	set a(b) 3
+	set x $(2 + $a(b))
+} 5
+test exprsugar-1.12 {Simple operations} {
+	set x $((2 + 4))
+} 6
+
+testreport