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

slots: make predicates return booleans.

db4
John Benediktsson 2012-08-14 18:09:50 -07:00
parent 980f1236cf
commit 6a1f280e88
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
core/slots/slots.factor
View File

@ -11,11 +11,11 @@ TUPLE: slot-spec name offset class initial read-only ;
PREDICATE: reader < word "reader" word-prop ; PREDICATE: reader < word "reader" word-prop ;
PREDICATE: reader-method < method "reading" word-prop ; PREDICATE: reader-method < method "reading" word-prop >boolean ;
PREDICATE: writer < word "writer" word-prop ; PREDICATE: writer < word "writer" word-prop ;
PREDICATE: writer-method < method "writing" word-prop ; PREDICATE: writer-method < method "writing" word-prop >boolean ;
: <slot-spec> ( -- slot-spec ) : <slot-spec> ( -- slot-spec )
slot-spec new slot-spec new