Paste: a bug in help-lint tool
Author: | dmsh |
Mode: | factor |
Date: | Sun, 27 Jun 2010 14:56:04 |
Plain Text |
USING: help.markup help.syntax ;
: foo drop 1 ;
HELP: foo { $values { "x" object } { "x" object } } { $description "bar baz" } ;
"scratchpad" help-lint
Checking scratchpad...
:lint-failures - show 1 help lint failures
:lint-failures
==== <Listener input>
<Listener input>
Asset: T{ link f foo }
$values don't match stack effect
:lint-failures - show 1 help lint failures
Author: | dmsh |
Mode: | factor |
Date: | Sun, 27 Jun 2010 15:04:38 |
Plain Text |
\ effect-values see
USING: accessors arrays effects kernel sequences ;
IN: help.lint.checks
: effect-values
stack-effect [ in>> ] [ out>> ] bi append
[ dup pair? [ first ] when effect>string ] map ;
New Annotation