+ fixed bug 92 (var -> const)

+ bug #121 * removed uppercase names
2025-04-05 22:28:06 +02:00 · 1998-03-29 15:32:07 +00:00 · 1998-03-29 15:32:07 +00:00 · aae0d9d4cf
commit aae0d9d4cf
parent b533474430
5 changed files with 11 additions and 5 deletions
--- a/bugs/bug0052.pp
+++ b/bugs/bug0052.pp
--- a/bugs/bug0083.pp
+++ b/bugs/bug0083.pp
--- a/bugs/bug0092.pp
+++ b/bugs/bug0092.pp
@ -1,11 +1,9 @@
-program bug;
-
 {The unfixable bug. Maybe we get an idea when we keep looking at it.
-
 Daniel Mantione 5 februari 1998.}

-var	a:1..4=2;		{Crash 1.}
-   	b:set of 1..4=[2,3];	{Also crashes, but is the same bug.}
+const
+        a:1..4=2;               {Crash 1.}
+        b:set of 1..4=[2,3];    {Also crashes, but is the same bug.}

 begin
 end.
--- a/bugs/bug0121.pp
+++ b/bugs/bug0121.pp
@ -0,0 +1,7 @@
+var
+  c : cardinal;
+  b : byte;
+begin
+  b:=c;
+end.
+
--- a/bugs/readme.txt
+++ b/bugs/readme.txt
@ -166,3 +166,4 @@ bug0117.pp   internalerror 17 (and why is there an automatic float
 bug0118.pp   Procedural vars cannot be assigned nil ?
 bug0119.pp   problem with methods
 bug0120.pp   inc/dec(enumeration) doesn't work
+bug0121.pp   cardinal -> byte conversion not work (and crashes)