PageRenderTime 25ms CodeModel.GetById 20ms app.highlight 2ms RepoModel.GetById 1ms app.codeStats 0ms

/components/codetools/examples/testscompleteblock/casecolon1.inc

http://github.com/graemeg/lazarus
Pascal | 9 lines | 6 code | 2 blank | 1 comment | 0 complexity | 6f064ba51ae0422cdc706177a98c3c21 MD5 | raw file
1{%MainUnit unit1.pas}
2procedure Do1;
3begin
4  case i of
5  1:
6
7  end;
8end;
9