Warning, /frameworks/syntax-highlighting/autotests/reference/highlight.tcl.ref is written in an unsupported language. File is not indexed.
0001 <Comment># tcl syntax highlighting sample script for Kate</Comment><br/> 0002 <Comment>#</Comment><br/> 0003 <Comment># author: JM. Philippe 15/03/04</Comment><br/> 0004 <Normal Text></Normal Text><br/> 0005 <Comment># escaped characters</Comment><br/> 0006 <Keyword>set</Keyword><Normal Text> String </Normal Text><Char>\{</Char><br/> 0007 <Keyword>set</Keyword><Normal Text> String </Normal Text><Char>\{</Char><br/> 0008 <Keyword>set</Keyword><Normal Text> String </Normal Text><Char>\"</Char><br/> 0009 <Keyword>set</Keyword><Normal Text> String </Normal Text><String>" </String><Char>\"</Char><String> "</String><br/> 0010 <Keyword>set</Keyword><Normal Text> String </Normal Text><String>" </String><Char>\{</Char><String> "</String><br/> 0011 <Normal Text></Normal Text><br/> 0012 <Comment>#comments and not comments</Comment><br/> 0013 <Comment># is comments</Comment><br/> 0014 <Normal Text>;</Normal Text><Comment>#is comments</Comment><br/> 0015 <Normal Text> </Normal Text><Comment># is comments</Comment><br/> 0016 <Comment># <h1> is html comment </h1></Comment><br/> 0017 <Keyword>puts</Keyword><Normal Text> ok; </Normal Text><Comment># is comments</Comment><br/> 0018 <Keyword>set</Keyword><Normal Text> String </Normal Text><Keyword>[string</Keyword><Normal Text> </Normal Text><Parameter>map</Parameter><Normal Text> </Normal Text><Keyword>{</Keyword><Normal Text></a> </Normal Text><Keyword>{</Keyword><Normal Text><span>»</Normal Text><Parameter>is</Parameter><Normal Text> not comments</span></a></Normal Text><Keyword>}}</Keyword><Normal Text> </Normal Text><Variable>$String</Variable><Keyword>]</Keyword><br/> 0019 <Keyword>set</Keyword><Normal Text> String </Normal Text><Char>\#</Char><Normal Text>not_a_comment</Normal Text><br/> 0020 <Normal Text></Normal Text><br/> 0021 <Comment># blocks</Comment><br/> 0022 <Keyword>proc</Keyword><Normal Text> test </Normal Text><Keyword>{</Keyword><Normal Text>arg1 </Normal Text><Keyword>{</Keyword><Normal Text>arg2 </Normal Text><Keyword>{}}</Keyword><Normal Text> </Normal Text><Keyword>{</Keyword><Normal Text>arg3 </Normal Text><Keyword>{</Keyword><Normal Text>fr fq r</Normal Text><Keyword>}}}</Keyword><Normal Text> </Normal Text><Keyword>{</Keyword><br/> 0023 <Normal Text> </Normal Text><Keyword>if</Keyword><Normal Text> </Normal Text><Keyword>{</Keyword><Decimal>1</Decimal><Keyword>}</Keyword><Normal Text> </Normal Text><Keyword>{</Keyword><Normal Text>; </Normal Text><Comment>#comments</Comment><br/> 0024 <Normal Text> </Normal Text><Keyword>set</Keyword><Normal Text> String </Normal Text><Char>\{</Char><Normal Text>; </Normal Text><Comment># not a block start</Comment><br/> 0025 <Normal Text> </Normal Text><Keyword>}</Keyword><br/> 0026 <Keyword>}</Keyword><br/> 0027 <Normal Text></Normal Text><br/> 0028 <Keyword>proc</Keyword><Normal Text> test </Normal Text><Parameter>args</Parameter><Normal Text> </Normal Text><Keyword>{</Keyword><br/> 0029 <Normal Text> </Normal Text><Keyword>set</Keyword><Normal Text> String </Normal Text><Char>\}</Char><Normal Text>; </Normal Text><Comment># not a block end</Comment><br/> 0030 <Keyword>}</Keyword><br/> 0031 <Normal Text></Normal Text><br/> 0032 <Region Marker># BEGIN - collapsable comments</Region Marker><br/> 0033 <Comment># blablabla</Comment><br/> 0034 <Region Marker># END</Region Marker><br/> 0035 <Normal Text></Normal Text><br/> 0036 <Comment># strings</Comment><br/> 0037 <Keyword>set</Keyword><Normal Text> String </Normal Text><String>"feqr feqr </String><Variable>$</Variable><String>gqer gqe"</String><br/> 0038 <Keyword>set</Keyword><Normal Text> String </Normal Text><String>"feqr</String><br/> 0039 <String>feqr </String><Char>\"</Char><String> </String><Variable>$</Variable><String>gqer \</String><br/> 0040 <String>gqe</String><br/> 0041 <String>"</String><br/> 0042 <Keyword>set</Keyword><Normal Text> String </Normal Text><Keyword>{</Keyword><Normal Text>feqr</Normal Text><br/> 0043 <Normal Text>feqr </Normal Text><Char>\{</Char><Normal Text> </Normal Text><Variable>$gqer</Variable><Normal Text> \</Normal Text><br/> 0044 <Normal Text>gqe</Normal Text><br/> 0045 <Keyword>}</Keyword><br/> 0046 <Normal Text></Normal Text><br/> 0047 <Comment># variables</Comment><br/> 0048 <Keyword>set</Keyword><Normal Text> b+</Normal Text><Decimal>1</Decimal><Normal Text> </Normal Text><Keyword>[incr</Keyword><Normal Text> b</Normal Text><Keyword>]</Keyword><br/> 0049 <Keyword>set</Keyword><Normal Text> </Normal Text><Keyword>{incr</Keyword><Normal Text>-b</Normal Text><Keyword>}</Keyword><Normal Text> </Normal Text><Variable>${b+1}</Variable><br/> 0050 <Keyword>puts</Keyword><Normal Text> </Normal Text><Variable>${incr-b}</Variable><br/>