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

new accessors

db4
Doug Coleman 2008-09-02 01:53:55 -05:00
parent 33569bae19
commit 05779654ec
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/stack-checker/stack-checker-tests.factor
View File

@ -148,7 +148,7 @@ M: fixnum potential-hang dup [ potential-hang ] when ;
TUPLE: funny-cons car cdr ; TUPLE: funny-cons car cdr ;
GENERIC: iterate ( obj -- ) GENERIC: iterate ( obj -- )
M: funny-cons iterate funny-cons-cdr iterate ; M: funny-cons iterate cdr>> iterate ;
M: f iterate drop ; M: f iterate drop ;
M: real iterate drop ; M: real iterate drop ;