diff options
| author | florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2011-04-10 19:20:48 +0000 |
|---|---|---|
| committer | florian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2011-04-10 19:20:48 +0000 |
| commit | 160cc1e115eeb75638dce6effdd16b2bc810ddb4 (patch) | |
| tree | b791a95695a7cf674e61a6153139c6f9c6c491fa /compiler/defcmp.pas | |
| parent | 3843727e74b31bbf2a34e7e3b89ee422269f770e (diff) | |
| parent | 413a6aa6469e6c297780217a27ca91363c637944 (diff) | |
| download | fpc-avr.tar.gz | |
* rebase to trunk@17295avr
git-svn-id: http://svn.freepascal.org/svn/fpc/branches/avr@17296 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/defcmp.pas')
| -rw-r--r-- | compiler/defcmp.pas | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/compiler/defcmp.pas b/compiler/defcmp.pas index 6c0f27f793..f917a15a55 100644 --- a/compiler/defcmp.pas +++ b/compiler/defcmp.pas @@ -1260,7 +1260,9 @@ implementation find_real_objcclass_definition(tobjectdef(def_to),false)) then begin doconv:=tc_equal; - eq:=te_equal; + { exact, not equal, because can change between interface + and implementation } + eq:=te_exact; end { object pascal objects } else if (def_from.typ=objectdef) and |