+ Patch to Patch from peter

This commit is contained in:
michael 2003-06-06 07:35:14 +00:00
parent a762ddbdc2
commit 732c769f30

View File

@ -157,7 +157,7 @@ unit cpupara;
internalerror(200305251); internalerror(200305251);
getselflocation.loc:=LOC_REFERENCE; getselflocation.loc:=LOC_REFERENCE;
getselflocation.reference.index.enum:=R_INTREGISTER; getselflocation.reference.index.enum:=R_INTREGISTER;
getselflocation.reference.index.number:=NR_FRAME_POINTER_REG; getselflocation.reference.index.number:=NR_STACK_POINTER_REG;
getselflocation.reference.offset:=hsym.adjusted_address; getselflocation.reference.offset:=hsym.adjusted_address;
end; end;
@ -166,7 +166,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.14 2003-06-06 07:34:11 michael Revision 1.15 2003-06-06 07:35:14 michael
+ Patch to Patch from peter
Revision 1.14 2003/06/06 07:34:11 michael
+ Patch from peter + Patch from peter
Revision 1.13 2003/06/05 20:58:05 peter Revision 1.13 2003/06/05 20:58:05 peter