Bug??

Hi again,

Why do I get this: *********************************** Reading specs from c:/utils/gpc/lib/specs gpc driver version 980420(2.80) executing gpc version 2.8.0 c:/utils/gpc/bin/gpc-cpp.exe -lang-pascal -v -nocharescape -undef -D__GNUC__=2 -D__GPC__=2 -D__GNUC_MINOR__=8 -Dunix -Di386 -DGO32 -DMSDOS -DDJGPP=2 -D__unix__ -D__i386__ -D__GO32__ -D__MSDOS__ -D__DJGPP__=2 -D__unix -D__i386 -D__GO32 -D__ MSDOS -D__DJGPP=2 -Asystem(unix) -Asystem(msdos) -Acpu(i386) -Amachine(i386) -D_ _BITS_LITTLE_ENDIAN__=1 -D__BYTES_LITTLE_ENDIAN__=1 -D__WORDS_LITTLE_ENDIAN__=1 -Di386 -Asystem(unix) -Acpu(i386) -Amachine(i386) -D__i386__ -Asystem(unix) -Acp u(i386) -Amachine(i386) mandel1.pas c:/utils/gpc/tmp/ccbaaaaa GNU CPP version 980420(2.80) (80386, BSD syntax) #include "..." search starts here: #include <...> search starts here: c:/utils/gpc/include c:/utils/gpc/lang/pascal c:/utils/gpc/contrib/grx22/include /usr/local/include JDIR/djgpp/include JDIR/lib/gcc-lib/djgpp/2.80/include $DJDIR/include End of search list. c:/utils/gpc/bin/gpc1.exe c:/utils/gpc/tmp/ccbaaaaa -quiet -dumpbase mandel1.pa s -version -famtmpfile=mandel1.gpc -fautomake=-v -o c:/utils/gpc/tmp/cccaaaaa GNU Pascal version 980420(2.80) (djgpp) compiled by GNU C version 2.8.0. Exiting due to signal SIGSEGV Page fault at eip=00122752, error=0004 eax=003c500c ebx=00394620 ecx=00000000 edx=00084421 esi=003d8ca0 edi=003dabac ebp=0035f5f4 esp=0035f5ec program=c:/utils/gpc/bin/gpc1.exe cs: sel=0117 base=838a8000 limit=ff6b6fff ds: sel=011f base=838a8000 limit=ff6b6fff es: sel=011f base=838a8000 limit=ff6b6fff fs: sel=00ef base=00035580 limit=0000ffff gs: sel=012f base=00000000 limit=ffffffff ss: sel=011f base=838a8000 limit=ff6b6fff

Call frame traceback EIPs: 0x00122752 0x0011e0a2 0x00120600 0x0011f8fd 0x0011f928 0x0011f933 0x0011f933 0x0011f933 0x0011f933 0x0011f933 0x0011f933 *********************************** While trying to compile this: ********MANDEL1.PAS************* Program Mandelbrot; Uses grx20;

Procedure Genera; var z, c : complex; x, y : integer; n : integer; pre, pim : real; begin for x:=1 to 640 do for y:=1 to 480 do begin pre := (4/640)*x - 2; pim := (4/480)*y - 2; z := cmplx (pre, pim); c := z; n := 0; repeat z:=(z pow 2) + c; inc(n); until ((n=255) or (abs(z)>4)); GRplot(x, y, n); end; end;

var x, y, xv, yv, c, m : integer;

begin

x := 640; y := 480; xv := 640; yv := 640; c := 256;

M := GrSetMode(GR_width_height_color_graphics,x,y,c,xv,yv);

genera; end. ********************************* Using: ********************************* gpc -v --automake=-v mandel1.pas

I'm running GPC under DJGPP in a DOS box under windows 95.

Thanks, Ariel. --- Ariel Bendersky bender@einstein.com.ar