File: tcl.xml

package info (click to toggle)
gedit 2.14.4-8
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 24,300 kB
  • ctags: 4,353
  • sloc: ansic: 40,912; xml: 20,600; sh: 9,000; python: 4,628; makefile: 686
file content (55 lines) | stat: -rw-r--r-- 1,109 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
<?xml version="1.0" encoding="UTF-8"?>
<snippets language="Tcl">
  <snippet id="foreach">
    <text><![CDATA[foreach ${1:var} ${2:\$list} {
	${3}
}
]]></text>
    <description>foreach...</description>
    <tag>foreach</tag>
  </snippet>
  <snippet id="for">
    <text><![CDATA[for {${1:set i 0}} {${2:\$i < \$n}} {${3:incr i}} {
	${4}
}
]]></text>
    <description>for...</description>
    <tag>for</tag>
  </snippet>
  <snippet id="if">
    <text><![CDATA[if {${1:condition}} {
	${2}
}
]]></text>
    <description>if...</description>
    <tag>if</tag>
  </snippet>
  <snippet id="proc">
    <text><![CDATA[proc ${1:name} {${2:args}} \\
{
	${3}
}
]]></text>
    <description>proc...</description>
    <tag>proc</tag>
  </snippet>
  <snippet id="switch">
    <text><![CDATA[switch ${1:-exact} -- ${2:\$var} {
	${3:match} {
		${4}
	}
	default {${5}}
}
]]></text>
    <description>switch...</description>
    <tag>switch</tag>
  </snippet>
  <snippet id="while">
    <text><![CDATA[while {${1:condition}} {
	${2}
}
]]></text>
    <description>while...</description>
    <tag>while</tag>
  </snippet>
</snippets>