[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