factor/basis/help/markup/markup-tests.factor

USING: definitions help help.markup kernel sequences tools.test
words parser namespaces assocs generic io.streams.string accessors ;
IN: help.markup.tests

TUPLE: blahblah quux ;

[ "an int" ] [ [ { "int" } $instance ] with-string-writer ] unit-test

[ ] [ \ quux>> print-topic ] unit-test
[ ] [ \ >>quux print-topic ] unit-test
[ ] [ \ blahblah? print-topic ] unit-test

: fooey "fooey" throw ;

[ ] [ \ fooey print-topic ] unit-test

[ ] [ gensym print-topic ] unit-test
Initial import 2007-09-20 18:09:08 -04:00			`USING: definitions help help.markup kernel sequences tools.test`
new accessors 2008-09-02 02:53:28 -04:00			`words parser namespaces assocs generic io.streams.string accessors ;`
New convention for unit tests 2008-03-01 17:00:45 -05:00			`IN: help.markup.tests`
Initial import 2007-09-20 18:09:08 -04:00
			`TUPLE: blahblah quux ;`

Massive name change in files, string streams 2008-02-15 23:20:31 -05:00			`[ "an int" ] [ [ { "int" } $instance ] with-string-writer ] unit-test`
Initial import 2007-09-20 18:09:08 -04:00
"help" test in UI should not affect browser tool 2008-11-22 02:24:05 -05:00			`[ ] [ \ quux>> print-topic ] unit-test`
			`[ ] [ \ >>quux print-topic ] unit-test`
			`[ ] [ \ blahblah? print-topic ] unit-test`
Initial import 2007-09-20 18:09:08 -04:00
			`: fooey "fooey" throw ;`

"help" test in UI should not affect browser tool 2008-11-22 02:24:05 -05:00			`[ ] [ \ fooey print-topic ] unit-test`
Initial import 2007-09-20 18:09:08 -04:00
"help" test in UI should not affect browser tool 2008-11-22 02:24:05 -05:00			`[ ] [ gensym print-topic ] unit-test`