*** empty log message ***

bugs/bug0200.pp

@@ -0,0 +1,24 @@
+PROGRAM PRTest;
+
+TYPE
+  ptRec = ^tRec;
+  tRec = Record
+           D : DWORD;
+         END;
+
+VAR
+  pR1, pR2 : ptRec;
+BEGIN
+  GetMem(pR1, SizeOf(tRec));
+  GetMem(pR2, SizeOf(tRec));
+
+  pR1^.D := 10;
+  Move(pR1^,pR2^,SizeOf(tRec));
+  WriteLn(pR1^.D:16,pR2^.D:16);
+
+  pR1^.D := 1;
+  pR2^.D := pR1^.D*2;			{ THE BUG IS HERE }
+  WriteLn(pR1^.D:16,pR2^.D:16);
+  if (pR1^.D<>1) or (pR2^.D<>2) then
+    Halt(1);
+END.

bugs/readme.txt

@@ -221,6 +221,7 @@ Fixed bugs:
   bug0195.pp   Problem with Getimage, crash of DOS box, even with dpmiexcp!! (PFV)
                Not a bug, you must use p^.
 	       
+  bug0199.pp   bug in mul code                                OK 0.99.11  (FK)
 
 Unproducable bugs:
 ------------------
@@ -264,6 +265,5 @@ bug0197.pp   should produce an error: problem with c1:=c2<c3 where c? is
              a comp type
 bug0198.pp   calling specifications aren't allowed in class declarations,
              this should be allowed
-bug0199.pp   bug in mul code
 bug0200.pp   problem with constant strings which exceed length of pascal
              strings