]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/tools/annotations/annotations.factor
basis: ERROR: changes.
[factor.git] / basis / tools / annotations / annotations.factor
index dd71e63ffb428622ed65684306d8f6ce1f56e8da..7fd3bd6b14b85e8e9f77a38cfb7c161d60fc6563 100644 (file)
@@ -33,7 +33,7 @@ PREDICATE: annotated < word "unannotated-def" word-prop >boolean ;
 <PRIVATE
 
 : check-annotate-twice ( word -- word )
-    dup annotated? [ cannot-annotate-twice ] when ;
+    dup annotated? [ throw-cannot-annotate-twice ] when ;
 
 : annotate-generic ( word quot -- )
     [ "methods" word-prop values ] dip each ; inline