[fpc-pascal] What is wrong with this enum and array related code

2010-09-12 Thread Frank Church
program testnums; //{$APPTYPE CONSOLE} uses Classes, SysUtils; type stType = (stLite := -100, stDb, stBothLite, stBothDb); //settings location Type stTypes = Array [stType] of integer; var d : stType; s : string; i : integer; begin writeln(''); for i := Ord(low(stType)) to

Re: [fpc-pascal] What is wrong with this enum and array related code

2010-09-12 Thread Vincent Snijders
2010/9/12 Frank Church vfcli...@gmail.com: program testnums; //{$APPTYPE CONSOLE} uses   Classes, SysUtils; type    stType = (stLite := -100, stDb, stBothLite, stBothDb); //settings location Type    stTypes = Array [stType] of integer; var  d : stType;  s : string;  i : integer;