Please Read This Text File :-(

_____________________________________________________________________ Sent by RocketMail. Get your free e-mail at http://www.rocketmail.com

The following code, especially the Arrays, causes GPC1.EXE to page fault. I think this is a bug of the compiler because if I comment them out the compiler runs (complaining about invalid reference to Colours, Cmds, etc.)

Type TComStr = String(8); TColStr = String(12);

Const NumCmds : Byte = 12;

Var Colours : Array[0..15] Of TColStr Value (0 :'BLACK'; 1 :'BLUE'; 2 :'GREEN'; 3 :'CYAN'; 4 :'RED'; 5 :'MAGENTA'; 6 :'BROWN'; 7 :'LIGHTGREY'; 8 :'DARKGREY'; 9 :'LIGHTBLUE'; 10:'LIGHTGREEN'; 11:'LIGHTCYAN'; 12:'LIGHTRED'; 13:'LIGHTMAGENTA'; 14:'YELLOW'; 15:'WHITE');

Cmds : Array[1..12] Of TComStr Value (1 :'@POS('; 2 :'@COLOUR('; 3 :'@CLS'; 4 :'@WAIT('; 5 :'@CURSON'; 6 :'@CURSOFF'; 7 :'@FILE('; 8 :'@LOAD('; 9 :'@SAVE('; 10:'@FILL('; 11:'@SLEEP('; 12:'@SOUND(');

Stack trace:

Exiting due to signal SIGSEGV Page fault at eip=0003bdbd, error=0004 eax=00000112 ebx=00191ecc ecx=0018db3c edx=00191e38 esi=00182dd4 edi=00000006 ebp=00182cf8 esp=00182cec program=c:/utils/djgpp/bin\gpc1.exe cs: sel=0127 base=100d0000 limit=001cffff ds: sel=012f base=100d0000 limit=001cffff es: sel=012f base=100d0000 limit=001cffff fs: sel=010f base=000165b0 limit=0000ffff gs: sel=013f base=00000000 limit=ffffffff ss: sel=012f base=100d0000 limit=001cffff

Call frame traceback EIPs: 0x0003bdbd 0x0003bdee 0x0001b2a4 0x0006fdfa 0x000721e9 0x0011818e

Please respond to Gareth_Wilson@RocketMail.Com.