+ Patch from peter

compiler/i386/cpupara.pas

@@ -156,7 +156,8 @@ unit cpupara;
          if not assigned(hsym) then
            internalerror(200305251);
          getselflocation.loc:=LOC_REFERENCE;
-         getselflocation.reference.index:=current_procinfo.framepointer;
+         getselflocation.reference.index.enum:=R_INTREGISTER;
+         getselflocation.reference.index.number:=NR_FRAME_POINTER_REG;
          getselflocation.reference.offset:=hsym.adjusted_address;
       end;
 
@@ -165,7 +166,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.13  2003-06-05 20:58:05  peter
+  Revision 1.14  2003-06-06 07:34:11  michael
+  + Patch from peter
+
+  Revision 1.13  2003/06/05 20:58:05  peter
     * updated
 
   Revision 1.12  2003/05/30 23:57:08  peter