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

see: don't show accessor methods in see-methods

db4
Slava Pestov 2009-09-08 14:46:36 -05:00
parent c4c6c6b986
commit 12102e488f
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
basis/see/see.factor
View File

@ -7,7 +7,7 @@ generic.single generic.standard generic.hook io io.pathnames
io.streams.string io.styles kernel make namespaces prettyprint io.streams.string io.styles kernel make namespaces prettyprint
prettyprint.backend prettyprint.config prettyprint.custom prettyprint.backend prettyprint.config prettyprint.custom
prettyprint.sections sequences sets sorting strings summary words prettyprint.sections sequences sets sorting strings summary words
words.symbol words.constant words.alias vocabs ; words.symbol words.constant words.alias vocabs slots ;
IN: see IN: see
GENERIC: synopsis* ( defspec -- ) GENERIC: synopsis* ( defspec -- )
@ -212,7 +212,10 @@ M: word see*
] tri ; ] tri ;
: seeing-implementors ( class -- seq ) : seeing-implementors ( class -- seq )
dup implementors [ method ] with map natural-sort ; dup implementors
[ [ reader? ] [ writer? ] bi or not ] filter
[ method ] with map
natural-sort ;
: seeing-methods ( generic -- seq ) : seeing-methods ( generic -- seq )
"methods" word-prop values natural-sort ; "methods" word-prop values natural-sort ;