* fixed test tmaclocalprocparam4c.pp for i8086 medium memory model

git-svn-id: trunk@25833 -

tests/test/tmaclocalprocparam4c.pp

@@ -6,7 +6,7 @@
 type
   tprocedure = procedure;
 
-procedure test(p: pointer);
+procedure test(p: codepointer);
 
   procedure nested;
     begin