* fixed comparison of two procvars in the i8086 compact and medium memory models

git-svn-id: trunk@32166 -

compiler/nadd.pas

@@ -2116,8 +2116,8 @@ implementation
               begin
                 if tprocvardef(rd).is_addressonly then
                   begin
-                    inserttypeconv_internal(right,voidpointertype);
-                    inserttypeconv_internal(left,voidpointertype);
+                    inserttypeconv_internal(right,voidcodepointertype);
+                    inserttypeconv_internal(left,voidcodepointertype);
                   end
                 else
                   begin