[OpenBIOS] Update

[Programmingkid]

Here is a better version of '{' with another word added.


: currentWordName ( -- addr len )
currentWordAddr @
currentWordLen @
;


: {	
	copyWordName
	begin
	parse-word dup 0>
	while
		2dup drop " }" comp  0=
		if exit then
		2dup drop " ;" comp 0=
		if false useTopStackValue !
		else currentWordAddr @ currentWordLen @ loadLocalVariable 
		then
	repeat
			
	postpone currentWordName
; immediate