steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

cpu.x86.assembler: fix typo

db4
Slava Pestov 2010-05-18 17:59:34 -04:00
parent 0aa6ae0feb
commit 2dde83767c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/cpu/x86/assembler/syntax/syntax.factor
View File

@ -20,7 +20,7 @@ registers [ H{ } clone ] initialize
'[ _ + _ define-register ] map-index ; '[ _ + _ define-register ] map-index ;
: define-registers ( names size -- ) : define-registers ( names size -- )
[ [ 0 ] dip (define-registers) ] [ drop ] 2bi registers get set-at ; [ [ 0 ] dip (define-registers) ] keep registers get set-at ;
SYNTAX: REGISTERS: SYNTAX: REGISTERS:
scan-word [ ";" parse-tokens ] dip define-registers ; scan-word [ ";" parse-tokens ] dip define-registers ;