casecolon1.inc | searchcode

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