On Tuesday 11 March 2003 15:30, Anton Ertl wrote:
> Hopefully Bernd will squash the bug soon, and then we will have 0.6.1.

Found it. It was not related to any cross.fs features, but -trailing didn't 
work with empty strings, if there was a blank before - and cross uses 
-trailing to detect empty source lines. Test it with

s"    " + 0 -trailing . drop

This should not give a negative number for the count. Fixed -trailing:

: -trailing  ( c_addr u1 -- c_addr u2 ) \ string dash-trailing
\G Adjust the string specified by @i{c-addr, u1} to remove all
\G trailing spaces. @i{u2} is the length of the modified string.
    BEGIN
        dup
    WHILE
        1- 2dup + c@ bl <>
    UNTIL  1+  THEN ;

Now the reason why this did always work in little endian is that the 
"loadfilename" descriptor stored in the heap before the input string never 
can end with $20 in little endian, but may end with this byte in big 
endian.

-- 
Bernd Paysan
"If you want it done right, you have to do it yourself"
http://www.jwdt.com/~paysan/


---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to