|
|
@@ -1618,7 +1618,7 @@ begin
|
|
|
if p^.typ <> ait_instruction then
|
|
|
exit;
|
|
|
hp := paicpu(p);
|
|
|
- for count := 0 to high(hp^.ops) do
|
|
|
+ for count := low(hp^.oper) to high(hp^.oper) do
|
|
|
begin
|
|
|
case hp^.oper[count].typ of
|
|
|
top_ref:
|
|
|
@@ -2436,7 +2436,10 @@ End.
|
|
|
|
|
|
{
|
|
|
$Log$
|
|
|
- Revision 1.4 2000-11-03 18:06:26 jonas
|
|
|
+ Revision 1.5 2000-11-08 16:04:34 sg
|
|
|
+ * Fix for containsPointerRef: Loop now runs in the correct range
|
|
|
+
|
|
|
+ Revision 1.4 2000/11/03 18:06:26 jonas
|
|
|
* fixed bug in arrayRefsEq
|
|
|
* object/class fields are now handled the same as local/global vars and
|
|
|
parameters (ie. a write to a local var can now never destroy a class
|
sg