* fixed test cg/taddr2.pp for i8086 medium memory model

git-svn-id: trunk@25504 -

tests/test/cg/taddr2.pp

@@ -51,7 +51,7 @@ var
  pcharptr : pchar;
  plongint : ^longint;
  long: longint;
- ptr: pointer;
+ ptr: codepointer;
 begin
  { Test procedure variable }
  procptr:=testprocvar;