descriptive: update for tools.annotations change
parent
ef73bc6732
commit
0dffd311a5
|
@ -28,7 +28,7 @@ PRIVATE>
|
|||
|
||||
: make-descriptive ( word -- )
|
||||
dup [ ] [ def>> ] [ stack-effect ] tri [descriptive]
|
||||
'[ drop _ ] annotate-methods ;
|
||||
'[ drop _ ] annotate ;
|
||||
|
||||
: define-descriptive ( word def effect -- )
|
||||
[ drop "descriptive-definition" set-word-prop ]
|
||||
|
|
Loading…
Reference in New Issue