home *** CD-ROM | disk | FTP | other *** search
/ PC Welt 2006 November (DVD) / PCWELT_11_2006.ISO / casper / filesystem.squashfs / usr / share / gedit-2 / plugins / snippets / tcl.xml < prev    next >
Encoding:
Extensible Markup Language  |  2006-08-27  |  1.1 KB  |  56 lines
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <snippets language="Tcl">
  3.   <snippet id="foreach">
  4.     <text><![CDATA[foreach ${1:var} ${2:\$list} {
  5.     ${3}
  6. }
  7. ]]></text>
  8.     <description>foreach...</description>
  9.     <tag>foreach</tag>
  10.   </snippet>
  11.   <snippet id="for">
  12.     <text><![CDATA[for {${1:set i 0}} {${2:\$i < \$n}} {${3:incr i}} {
  13.     ${4}
  14. }
  15. ]]></text>
  16.     <description>for...</description>
  17.     <tag>for</tag>
  18.   </snippet>
  19.   <snippet id="if">
  20.     <text><![CDATA[if {${1:condition}} {
  21.     ${2}
  22. }
  23. ]]></text>
  24.     <description>if...</description>
  25.     <tag>if</tag>
  26.   </snippet>
  27.   <snippet id="proc">
  28.     <text><![CDATA[proc ${1:name} {${2:args}} \\
  29. {
  30.     ${3}
  31. }
  32. ]]></text>
  33.     <description>proc...</description>
  34.     <tag>proc</tag>
  35.   </snippet>
  36.   <snippet id="switch">
  37.     <text><![CDATA[switch ${1:-exact} -- ${2:\$var} {
  38.     ${3:match} {
  39.         ${4}
  40.     }
  41.     default {${5}}
  42. }
  43. ]]></text>
  44.     <description>switch...</description>
  45.     <tag>switch</tag>
  46.   </snippet>
  47.   <snippet id="while">
  48.     <text><![CDATA[while {${1:condition}} {
  49.     ${2}
  50. }
  51. ]]></text>
  52.     <description>while...</description>
  53.     <tag>while</tag>
  54.   </snippet>
  55. </snippets>
  56.