basis/help/html/html-tests.factor

   1 IN: help.html.tests
   2 USING: html.streams classes.predicate help.topics help.markup
   3 io.streams.string accessors prettyprint kernel tools.test ;
   4
   5 [ ] [ [ [ \ predicate-instance? def>> . ] with-html-writer ] with-string-writer drop ] unit-test