+ new bug files some already solved

bugs/bug0142.pp

@@ -1,5 +1,7 @@
 
+{$ifdef FPC}
 {$PACKRECORDS 1}
+{$endif FPC}
 
 type
 Time = object
@@ -10,4 +12,6 @@ var OT:Time;
  l : longint;
 begin
   l:=SizeOf(OT);
+  Writeln('Time object size is ',l);
+  if l<>3 then halt(1);
 end.

bugs/bug0176.pp

@@ -1,4 +1,4 @@
-unit u;
+unit bug0176;
 interface
 
 var
@@ -10,6 +10,6 @@ var
   l2 : longint;
   
 begin
-  u.l1:=1;
-  u.l2:=1;
+  bug0176.l1:=1;
+  bug0176.l2:=1;
 end.  

bugs/bug0178.pp

@@ -0,0 +1,15 @@
+PROGRAM NoLabel; { this program compiles fine with TP but not with FP }
+LABEL
+  N1,
+  N2,
+  FAIL, { this is a reserved word in constructors only! - FP fails here
+}
+  More; { label not defined - FP fails, but a warning is enough for that
+}
+           { since label referenced nowhere }
+BEGIN
+  N1: Write;
+  N2: Write;
+  FAIL: Write; 
+END.
+

bugs/bug0179.pp

@@ -0,0 +1,9 @@
+UNIT bug0179;
+INTERFACE
+  PROCEDURE A(B:WORD);
+IMPLEMENTATION
+  PROCEDURE A;  { <-- works with TP, FP says overloading problem }
+  BEGIN
+    Write(B);
+  END;
+END.

bugs/bug0180.pp

@@ -0,0 +1,14 @@
+{ this name should be accepted with -Un option !! }
+UNIT bug0180;
+INTERFACE
+  uses 
+     bug0180a;
+
+  procedure dummy;
+IMPLEMENTATION
+  procedure dummy;
+    begin
+      { Unit_with_strange_name.dummy; should this work ?? }
+      bug0180a.dummy; 
+    end;
+END.

bugs/bug0180a.pp

@@ -0,0 +1,12 @@
+{ this name should be accepted with -Un option !! }
+UNIT Unit_with_strange_name;
+INTERFACE
+  procedure dummy;
+IMPLEMENTATION
+  procedure dummy;
+    begin
+    end;
+
+begin
+   Unit_with_strange_name.dummy;
+END.

bugs/readme.txt

@@ -167,6 +167,7 @@ Fixed bugs:
   bug0139.pp   Cannot access protected method of ancestor class from other unit. OK 0.99.6
   bug0140.pp   Shows that interdependent units still are not OK.     OK 0.99.6 (PFV)
   bug0141.pp   Wrong Class sizes when using forwardly defined classes. OK 0.99.6
+  bug0142.pp   sizeof(object) is not tp7 compatible when no constructor is used OK 0.99.9 (PM)
   bug0143.pp   cannot concat string and array of char in $X+ mode    OK 0.99.7 (PFV)
   bug0144.pp   problem with 'with object do'                         OK 0.99.7 (PFV)
   bug0145.pp   typed files with huges records (needs filerec.size:longint) OK 0.99.7 (PFV)
@@ -183,6 +184,7 @@ Fixed bugs:
   bug0157.pp   Invalid compilation and also crashes                  OK 0.99.7 (PFV)
   bug0158.pp   Invalid boolean typecast                              OK 0.99.7 (PFV)
   bug0159.pp   Invalid virtual functions - should compile            OK 0.99.7 (FK)
+  bug0160.pp   Incompatibility with BP: Self shouldn't be a reserved word. OK 0.99.9 (PM)
   bug0161.pp   internal error when trying to create a set with another OK 0.99.9 (PFV)
   bug0162.pp   continue in repeat ... until loop doesn't work correct OK 0.99.8 (PFV)
   bug0164.pp   crash when using undeclared array index in with statement OK 0.99.8 (PFV)
@@ -195,6 +197,11 @@ Fixed bugs:
   bug0174.pp   Asm, offsets of fields are not possible yet           OK 0.99.9 (PFV)
   bug0176.pp   unit.symbol not allowed for implementation vars         OK 0.99.9 (PM)
   bug0177.pp   program.symbol not allowed (almost the same as bug 176) OK 0.99.9 (PM)
+  bug0178.pp   problems with undefined labels and fail outside constructor OK 0.99.9 (PM)
+  bug0180.pp   problem for units with names different from file name
+                 should be accepted with -Un !!
+               Solved, but you still need to use the file name from other
+               units  OK 0.99.9 (PM) 
 
 Unproducable bugs:
 ------------------
@@ -202,14 +209,10 @@ 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)  )
 
-
 Unfixed not important bugs (mostly incompatibilities):
 ------------------------------------------------------
 bug0111.pp   blockread(typedfile,...) is not allowed in TP7
 bug0133.pp   object type declaration not 100% compatibile with TP7
-bug0142.pp   sizeof(object) is not tp7 compatible when no constructor is used
-bug0160.pp   Incompatibility with BP: Self shouldn't be a reserved word.
-
 
 Unfixed bugs:
 -------------
@@ -228,4 +231,4 @@ bug0163.pp   missing <= and >= operators for sets.
 bug0169.pp   missing new(type) support for not object/class
 bug0171.pp   missing typecasting in constant expressions
 bug0172.pp   with with absolute seg:ofs should not be possible
-
+bug0179.pp   show a problem for -So mode