definitions: Separate definition definitions.

db4
Doug Coleman 2013-03-23 16:34:33 -07:00
parent 9dd0f84f07
commit b4acfa376a
5 changed files with 6 additions and 6 deletions

View File

@ -58,4 +58,4 @@ H{
: $tips-of-the-day ( element -- )
drop tips get [ nl nl ] [ content>> print-element ] interleave ;
INSTANCE: tip definition
INSTANCE: tip definition-mixin

View File

@ -7,7 +7,7 @@ IN: help.topics
TUPLE: link name ;
INSTANCE: link definition
INSTANCE: link definition-mixin
MIXIN: topic
@ -81,4 +81,4 @@ M: f valid-article? drop t ;
M: f article-title drop \ f article-title ;
M: f article-content drop \ f article-content ;
M: f article-parent drop \ f article-parent ;
M: f set-article-parent drop \ f set-article-parent ;
M: f set-article-parent drop \ f set-article-parent ;

View File

@ -3,7 +3,7 @@
USING: accessors assocs kernel namespaces sequences sets ;
IN: definitions
MIXIN: definition
MIXIN: definition-mixin
ERROR: no-compilation-unit definition ;

View File

@ -135,7 +135,7 @@ SYMBOL: require-hook
PREDICATE: runnable-vocab < vocab
vocab-main >boolean ;
INSTANCE: vocab-spec definition
INSTANCE: vocab-spec definition-mixin
: call-require-hook ( name -- )
require-hook get call( name -- ) ;

View File

@ -256,4 +256,4 @@ M: word hashcode*
M: word literalize <wrapper> ;
INSTANCE: word definition
INSTANCE: word definition-mixin