fpc/bugs

This directory contains test files for various FPC bugs.
The most files are very simple and it's neccessary to check the assembler
output.

The first coloumn contains the file name. If the file name is indended,
the bug is fixed and the last coloumn contains the version where
the bug is fixed.

In future, please add also your name short cut, when fixing a bug.

Fixed bugs:
-----------

bug0001.pp tests a bug in the .ascii output (#0 and too long) OK 0.9.2
bug0002.pp tests for the endless bug in the optimizer OK 0.9.2
bug0003.pp dito OK 0.9.2
bug0004.pp tests the continue instruction in the for loop OK 0.9.2
bug0005.pp tests the if 1=1 then ... bug OK 0.9.2
bug0006.pp tests the wrong floating point code generation OK 0.9.2
bug0007.pp tests the infinity loop when using byte counter OK 0.9.2
bug0008.pp tests the crash when decrementing constants OK 0.9.2
bug0009.pp tests comperations in function calls a(c<0); OK 0.9.2
bug0010.pp tests string constants exceeding lines OK 0.9.2
bug0011.pp tests div/mod bug, where edx is scrambled, if
a called procedure does a div/mod OK 0.9.2
bug0012.pp tests type conversation byte(a>b) OK 0.9.9 (FK)
bug0015.pp tests for wrong allocated register for return result
of floating function (allocates int register) OK 0.9.2
bug0018.pp tests for the possibility to declare all types
using pointers "forward" : type p = ^x; x=byte; OK 0.9.3
bug0021.pp tests compatibility of empty sets with other set
and the evalution of constant sets OK 0.9.3
bug0022.pp tests getting the address of a method OK 0.9.3
bug0023.pp tests handling of self pointer in nested methods OK 0.9.3

bug0025.pp tests for a wrong uninit. var. warning OK 0.9.3
bug0026.pp tests for a wrong unused. var. warning OK 0.9.4
bug0027.pp tests
type
enumtype = (One, two, three, forty:=40, fifty); OK 0.9.5
bug0028.pp type enumtype = (a); writeln(ord(a));
bug0029.pp tests typeof(object type) OK 0.99.1 (FK)
bug0030.pp tests type conversations in typed consts OK 0.9.6
bug0031.pp tests array[boolean] of .... OK 0.9.8
bug0032.pp tests for a bug with the stack OK 0.9.9
bug0033.pp tests var p : pchar; begin p:='c'; end. OK 0.9.9
bug0034.pp shows wrong line numbering when asmbler is parsed OK 0.9.9
in direct mode.
bug0035.pp label at end of block gives error OK 0.9.9 (FK)
bug0036.pp assigning a single character to array of char ?OK 0.9.9
gives a protection error
--------- cgi386.pas gives out gpf's when compiling the system OK 0.9.9 (FK)
unit.
bug0037.pp tests missing graph.setgraphmode OK RTL (FK)
bug0038.pp tests const ps : ^string = nil; OK 0.9.9 (FK)
bug0039.pp shows the else-else problem OK 0.9.9 (FK)
bug0040.pp shows the if b1 xor b2 problem where b1,b2 :boolean OK 0.9.9 (FK)
bug0041.pp shows the if then end. problem OK 0.9.9 (FK)
bug0044.pp shows $ifdef and comment nesting/directive problem OK 0.99.1 (PFV)
bug0045.pp shows problem with virtual private methods OK 0.9.9 (FK)
(might not be a true bug but more of an incompatiblity?)
the compiler warns now if there is a private and virtual
method
bug0046.pp problems with sets with values over 128 due to OK 0.99.1 (FK)
sign extension
(already fixed ) but also for SET_IN_BYTE
bug0047.pp compiling with -So crashes the compiler OK 0.99.1 (CEC)
bug0053.pp shows a problem with open arrays OK 0.99.1 (FK)
(crashes a win95-DOS box :) )
bug0055.pp internal error 10 (means too few registers OK 0.99.1 (FK)
- i386 ONLY)
bug0056.pp shows a _very_ simple expression which generates OK 0.99.1 (FK)
wrong assembler
bug0058.pp causes an internal error 10 (problem with getregisterOK 0.99.1 (FK)
in secondsmaller - i386 ONLY)
bug0059.pp shows the problem with syntax error with ordinal OK 0.99.1 (FK)
constants
bug0060.pp shows missing type checking for case statements OK 0.99.1 (CEC)
bug0061.pp shows wrong errors when compiling (NOT A BUG) OK 0.99.1
bug0064.pp shows other types of problems with case statements OK 0.99.1 (FK)
bug0065.pp shows that frac() doesn't work correctly. OK 0.99.1 (PFV)
bug0066.pp shows that Round doesn't work correctly. (NOT A BUG) OK 0.99.1
bug0067.pp and bug0067b.pp (Work together) OK 0.99.1
Shows incorrect symbol resolution when using uses in implementation
More info can be found in file bug0067b.pp.
bug0068.pp Shows incorrect type of ofs() OK 0.99.1 (PFV and FK)
bug0069.pp Shows problem with far qualifier in units OK 0.99.1 (CEC)
bug0071.pp shows that an unterminated constant string in a OK 0.99.1 (PFV)
writeln() statement crashes the compiler.
bug0072.pp causes an internal error 10 ( i386 ONLY ) OK 0.99.1 (FK)
bug0074.pp shows MAJOR bug when trying to compile valid code OK 0.99.1 (PM/CEC)
bug0075.pp shows invalid pchar output to console OK 0.99.1
---------- compiling pp -Us -di386 -Sg system.pp gives GPF OK 0.99.1
bug0076.pp Bug in intel asm generator. was already fixed OK 0.99.1 (FK)
bug0077.pp shows a bug with absolute in interface part of unit OK 0.99.1 (FK)
bug0077b.pp used by unit bug0077.pp
bug0078.pp Shows problems with longint constant in intel asm OK 0.99.1 (CEC)
parsers
bug0079.pp Shows problems with stackframe with assembler keyword OK 0.99.1 (CEC)
bug0081.pp Shows incompatibility with borland's 'array of char'. OK 0.99.1 (FK)
bug0082.pp Shows incompatibility with BP : Multiple destructors. OK 0.99.1 (FK)
bug0084.pp no more pascal type checking OK 0.99.1 (FK)
bug0085.pp shows runerror 216 OK 0.99.1 (CEC)
bug0086.pp shows runerror 216 OK 0.99.1 (CEC)
bug0087.pp shows internal error 12 - no more SegFaults OK 0.99.1 (FK)
bug0088.pp internal error 12 or Runerror 216 OK 0.99.1 (FK)
bug0089.pp internal error 12 or Runerror 216 OK 0.99.1 (FK)
bug0093.pp Two Cardinal type bugs 0K 0.99.1 (FK/MvC)
bug0094.pp internal error when recordtype not found with case OK 0.99.1
bug0095.pp case with ranges starting with #0 bugs OK 0.99.1 (FK)
bug0098.pp File type casts are not allowed (works in TP7) OK 0.99.1 (FK)
bug0099.pp wrong assembler code is genereatoed for range check OK 0.99.1 (?)
(at least under 0.99.0)
bug0101.pp no type checking for routines in interfance and OK 0.99.1 (CEC)
implementation
bug0104.pp cardinal greater than $7fffffff aren't written OK 0.99.1 (FK)
correct
bug0105.pp typecasts are now ignored problem (NOT A BUG) OK 0.99.1
bug0106.pp typecasts are now ignored problem (NOT A BUG) OK 0.99.1
bug0108.pp gives wrong error message OK 0.99.1 (PFV)
bug0109.pp syntax error not detected when using a set as pointer OK 0.99.1 (FK)
bug0112.pp still generates an internal error 10 OK 0.99.1 (FK)
bug0114.pp writeln problem (by Pavel Ozerski) OK 0.99.1 (PFV)
bug0116.pp when local variable size is > $ffff, enter can't be OK 0.99.1 (FK)
used to create the stack frame, but it is with -Og

Unproducable bugs:
------------------

Unfixed bugs:
-------------
bug0042.pp shows assembler double operator expression problem
bug0043.pp shows assembler nasm output with fpu opcodes problem
bug0048.pp shows a problem with putimage on some computers
(I can't reproduce the bug neither with a Millenium II
nor a Trio64 card (FK) )
bug0049.pp shows an error while defining subrange types
bug0050.pp can't set a function result in a nested
procedure of a function
bug0051.pp shows a problem with putpixel
bug0052.pp collects missing graph unit routines
bug0054.pp wordbool and longbool types are missed
bug0057.pp shows a crash with switch graph/text/graph
bug0062.pp shows illegal type conversion for boolean
bug0063.pp shows problem with ranges in sets for variables
bug0070.pp shows missing include and exclude from rtl
(probably requires inlining)
bug0073.pp shows incompatiblity with bp for distance qualifiers
bug0080.pp Shows Missing High() (internal) function.
bug0083.pp shows missing "dynamic" set constructor
bug0090.pp shows PChar comparison problem
bug0091.pp missing standard functions in constant expressions
bug0092.pp The unfixable bug. Maybe we find a solution one day.
bug0096.pp problem with objects as parameters
bug0097.pp two errors in bp7 but not in FPC
bug0100.pp a unit may only occure once in uses
bug0102.pp page fault when trying to compile under ppcm68k (intel version)
bug0103.pp problems with boolean typecasts (other type)
bug0107.pp shows page fault problem (run in TRUE DOS mode)
bug0110.pp SigSegv when using undeclared var in Case
bug0111.pp blockread(typedfile,...) is not allowed in TP7
bug0113.pp point initialization problems
bug0115.pp missing writeln for comp data type