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

Fix stack effect declarations for (>>foo) words

db4
Slava Pestov 2009-03-31 23:39:11 -05:00
parent 3211270d5b
commit ab7f433aa2
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

@ -97,7 +97,7 @@ ERROR: bad-slot-value value class ;
"writing" associate ; "writing" associate ;
: define-writer-generic ( name -- ) : define-writer-generic ( name -- )
writer-word (( object value -- )) define-simple-generic ; writer-word (( value object -- )) define-simple-generic ;
: define-writer ( class slot-spec -- ) : define-writer ( class slot-spec -- )
[ nip name>> define-writer-generic ] [ [ nip name>> define-writer-generic ] [