[OpenBIOS] [PATCH 7/10] Apple local variables implementation in Forth

Segher Boessenkool segher at kernel.crashing.org
Wed Aug 24 17:29:31 CEST 2011


>> +  dup locals_wordlist !
>> +  s" set-current" $find drop execute
>> +
>> +  parse-word 2drop \ ditch the {
>> +
>> +  begin
>> +    parse-word
>> +
>> +    2dup 3b comp-str-char \ check for ;
>
> Instead of 3b, write   [char] ;
> But, like I said, something like   2dup s" ;" compare   is much
> more readable.

Oh, and you're supposed to handle  |  exactly the same as  ;


Segher




More information about the OpenBIOS mailing list