Here is a new problem I get. It seems to be a new bug :-( I can't compile this simple program : --------------------------------------- Program Bug08; Type T_ScreenLimits = Set Of ShortCard; Const XLimits : T_ScreenLimits = [0,1279]; Var X : ShortCard; Begin X := 1279; If X In XLimits Then WriteLn('OK'); End; --------------------------------------- Here is the full message of the compiler : Reading specs from c:/djgpp/lib/gcc-lib/djgpp/2.952/specs gpc version 20000727, based on 2.95.2 19991024 (release) c:/djgpp/lib/gcc-lib/djgpp/2.952/gpcpp.exe -lang-pascal -v - famtmpfile=c:/djgpp/tmp\ccaqgwvh -fautobuild -fdelphi-comments - D__GNU_PASCAL__ -undef -D__GNUC__=2 -D__GNUC_MINOR__=95 - D__GPC__=2 -D__GPC_MINOR__=0 -D__GPC_RELEASE__=20000727 - D__BITS_LITTLE_ENDIAN__=1 -D__BYTES_LITTLE_ENDIAN__=1 - D__WORDS_LITTLE_ENDIAN__=1 -Dunix -Di386 -DGO32 -DDJGPP=2 - DMSDOS -D__OS_DOS__=1 -D__unix__ -D__i386__ -D__GO32__ - D__DJGPP__=2 -D__MSDOS__ -D__OS_DOS__=1 -D__unix -D__i386 - D__GO32 -D__DJGPP=2 -D__MSDOS -Asystem(unix) -Asystem(msdos) - Acpu(i386) -Amachine(i386) -g -Acpu(i386) -Amachine(i386) -Di386 -D__i386 - D__i386__ -D__tune_pentium__ -imacros c:/djgpp/lib/../include/sys/version.h - remap Bug08.pas c:/djgpp/tmp\ccbqgwvh.i GNU Pascal Compiler PreProcessor version 2.95.2 19991024 (release) (80386, BSD syntax) #include "..." search starts here: #include <...> search starts here: c:/djgpp/lang/pascal c:/djgpp/include c:/djgpp/contrib/grx232/include /usr/local/include JDIR/i586-pc-msdosdjgpp/include $DJDIR/lib/gcc-lib/djgpp/2.952/include $DJDIR/include End of search list. c:/djgpp/lib/gcc-lib/djgpp/2.952/gpc1.exe c:/djgpp/tmp\ccbqgwvh.i -quiet - dumpbase Bug08.pas -g -version -famtmpfile=c:/djgpp/tmp\ccaqgwvh -fautobuild - o c:/djgpp/tmp\ccbqgwvh.s GNU Pascal version 2.95.2 19991024 (release) (djgpp) compiled by GNU C version 2.95.2 19991024 (release). Bug08.pas:4: warning: integer set size limited to 256 elements from low bound Bug08.pas:4: warning: use -fsetlimit:NUMBER to change the limit at compile time Bug08.pas:9: Internal compiler error in `get_set_constructor_bits', at tree.c:5016 Please submit a full bug report. See <URL:http://www.gnu.org/software/gcc/faq.html#bugreport> for instructions. I also tried this other one, with the same result in compilation : --------------------------------------- Program Bug10; Type T_ScreenLimits = Set Of ShortCard; Var XLimits : T_ScreenLimits; Var X : ShortCard; Begin XLimits := [0,1279]; X := 1279; If X In XLimits Then WriteLn('OK'); End. --------------------------------------- I thought that by adding these definitions : Type T_ScreenLimits = Set Of ShortCard; Const XLimits : T_ScreenLimits = [0,1279]; I could overcome the impossibility to compile something like this : --------------------------------------- Program Temp; Var X : ShortCard; Begin X := 1279; If X In [0,1279] Then WriteLn('OK'); End. --------------------------------------- How can I define this simple set [0,1279] ? Last question : To who may I submit test programs If I think it could be added to the Test Suite of GPC sources ? Thanks in advance -- "Couperin"
participants (2)
-
Couperin -
Frank Heckenbach