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

Don't make a curry

Slava Pestov 2009-05-04 05:15:48 -05:00
parent 72691cae07
commit 925c78e8a6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
core/slots/slots.factor
View File

@ -122,7 +122,7 @@ ERROR: bad-slot-value value class ;
[ [
\ over , \ over ,
over reader-word 1quotation over reader-word 1quotation
[ dip call ] curry [ dip swap ] curry % [ dip call ] curry [ ] like [ dip swap ] curry %
swap setter-word , swap setter-word ,
] [ ] make (( object quot -- object )) define-inline ] [ ] make (( object quot -- object )) define-inline
] [ 2drop ] if ; ] [ 2drop ] if ;