|
@@ -3019,7 +3019,7 @@ implementation
|
|
docompare :=
|
|
docompare :=
|
|
inherited docompare(p) and
|
|
inherited docompare(p) and
|
|
(convtype = ttypeconvnode(p).convtype) and
|
|
(convtype = ttypeconvnode(p).convtype) and
|
|
- equal_defs(resultdef,left.resultdef);
|
|
|
|
|
|
+ equal_defs(totypedef,ttypeconvnode(p).totypedef);
|
|
end;
|
|
end;
|
|
|
|
|
|
|
|
|