Hello.
I have two arrays,
var
DisplayBuffer1,
DisplayBuffer2: array[0..1000] of word;
...
When I try to initialize these arrays in the following code
Procedure FillDisplayBuffers;
var desti, srci: integer;
begin
fillword(DisplayBuffer1,SizeOf(DisplayBuffer1),$100);
fillword(DisplayBuffer2,SizeOf(DisplayBuffer2),$100);
desti := 0;
...
I receive a SIGSECV exception "Project DSOtest raised exception class 'External: SIGSEGV'.
In file './include/canvas.inc' at line 25in the GRAPHICS unit "
If I change the code in my initialization procedure to
Procedure FillDisplayBuffers;
var desti, srci: integer;
begin
fillword(DisplayBuffer1,SizeOf(DisplayBuffer1),$100);
DisplayBuffer2 := DisplayBuffer1;
desti := 0;
...
my code compiles and executes correctly.
I'm curious: does anyone have any ideas why using two "fillword" calls in succession would be causing the SIGSEGV?