core/io/streams/nested/nested-tests.factor

   1 USING: io io.streams.string io.streams.nested kernel math
   2 namespaces io.styles tools.test ;
   3 IN: temporary
   4
   5 [ "=>a<=" ] [
   6     [
   7         [
   8             H{ { highlight t } } [
   9                 H{ } [ "a" write ] with-nesting
  10             ] with-style
  11         ] string-out
  12     ] with-scope
  13 ] unit-test
  14
  15 [ "a" ] [
  16     [
  17         [
  18             H{ } [
  19                 H{ { highlight t } } [ "a" write ] with-nesting
  20             ] with-style
  21         ] string-out
  22     ] with-scope
  23 ] unit-test