Author: wmb Date: Mon Jan 16 22:05:10 2012 New Revision: 2826 URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2826
Log: parses.fth - removed unused definitions +string and -string
Modified: forth/lib/parses1.fth
Modified: forth/lib/parses1.fth ============================================================================== --- forth/lib/parses1.fth Mon Jan 16 22:05:06 2012 (r2825) +++ forth/lib/parses1.fth Mon Jan 16 22:05:10 2012 (r2826) @@ -1,8 +1,6 @@ \ See license at end of file
headers -: +string ( adr len -- adr len+1 ) 1+ ; -: -string ( adr len -- adr+1 len-1 ) swap 1+ swap 1- ;
\ Splits a string into two halves before the first occurrence of \ a delimiter character.