[OpenBIOS] [commit] r911 - trunk/openbios-devel/forth/bootstrap

[Mark Cave-Ayland]

Tarl Neustädter wrote:

> Are those words correct? The return address from the colon definition 
> will also be on the return stack and will interfere. What I see in 
> various places in Openboot sources is:
> 
> : 2>r ( a b -- ) r> -rot swap >r >r >r ;
> : 2r> ( -- a b ) r> r> r> rot >r swap ;

Ah of course - while the standard says that these words are "the 
semantic equivalent of", they are talking about inline context rather 
than as standalone words where of course you need to tuck the values 
under the top-most R-stack item.

This should now be fixed in SVN trunk.


ATB,

Mark.

-- 
Mark Cave-Ayland - Senior Technical Architect
PostgreSQL - PostGIS
Sirius Corporation plc - control through freedom
http://www.siriusit.co.uk
t: +44 870 608 0063

Sirius Labs: http://www.siriusit.co.uk/labs