The problem isn't that Dennis is trying to manipulate return addresses
per se, but
that he is trying to bury data under a subroutine's return address.

The optimizer is replacing a nominal "CALL RESTORE RET" with "JUMP RESTORE"

Try putting a NOOP in the sequence, as "... RESTORE NOOP ;" or turn
off optimization
with "-OPT"

rick

> On Fri, Feb 20, 2009 at 7:05 PM, Leon Wagner <leon_at_forth.com> wrote:
>> It looks like you are trying to manipulate the return address in SAVE =
>> and RESTORE. You can't do that in a Standard program. In both cases, =
>> you begin with R> but you did not put anything on the return stack prior =
>> to that.
>>
>>> -----Original Message-----
>>> From: sftalk-bounce_at_forth.com=20
>>> [mailto:sftalk-bounce_at_forth.com] On Behalf Of Dennis Ruffer
>>> Sent: Friday, February 20, 2009 4:59 PM
>>> To: sftalk_at_forth.com
>>> Subject: [sftalk] What's this?
>>>=20
>>> I'm finding a strange problem with the pfDatabase plug-in I published
>>> at: http://vf-plugins.googlecode.com/files/pfDatabase.zip. It
>>> involves code that saves and restores the file information to the
>>> return stack. The code is defined like this:
>>>=20
>>> : SAVE ( -- ) ( R: -- f# db# r# ) R> R# @ >R DB# @ >R F# @ >R >R ;
>>> : RESTORE ( -- ) ( R: f# db# r# -- ) R> R> F# ! R> DB# !=20
>>> R> R# ! >R ;
>>>=20
----------------------------------------------------------------------
sftalk_at_forth.com The SwiftForth programming discussion email list
To unsubscribe, send subject "unsubscribe" to sftalk-request_at_forth.com
For list command help, send subject "help" to sftalk-request_at_forth.com
Message archives are located at http://www.forth.com/archive/sftalk
----------------------------------------------------------------------
This list is a forum for SwiftForth users. For product support and
bug reports, please send email to support_at_forth.com
----------------------------------------------------------------------
Received on Fri Feb 20 2009 - 17:23:45 PST