[OpenBIOS] About the local variable patch

[Programmingkid]

I ran Mark's local variable patch thru all these test and it past.

: myword { ; dog cat }
    4 -> dog
    33 -> cat
    cr ." dog = " dog .
    cr ." cat = " cat . 
;

4
: myword2 { hamster }
cr ." hamster = " hamster . 
;

8
: myword3 { car ; truck }
 5 -> truck
cr ." truck = " truck . 
cr ." car = " car . 
;

9 10
: myword4 { bevus butthead ; homer }
cr ." bevus = " bevus .
3 -> homer
cr ." homer = " homer .
cr ." butthead = " butthead . 
;

100 1 do I I 1 + myword4 loop

: myword6 { ; bart }
19 -> bart
cr ." bart in myword6 = " bart .
;

: myword5 { ; bart }
10 -> bart
myword6
cr ." bart in myword5 = " bart .
;

Good job :)