* fixed compilation of lnfodwrf in the i8086 medium and compact memory models

git-svn-id: trunk@30638 -

rtl/inc/lnfodwrf.pp

@@ -755,7 +755,7 @@ begin
 end;
 
 
-function DwarfBackTraceStr(addr : Pointer) : shortstring;
+function DwarfBackTraceStr(addr : CodePointer) : shortstring;
 var
   func,
   source : string;