extra/html/parser/utils/utils-tests.factor

   1 USING: html.parser.utils quoting tools.test ;
   2
   3 { "'Rome'" } [ "Rome" single-quote ] unit-test
   4 { "\"Roma\"" } [ "Roma" double-quote ] unit-test
   5 { "'Firenze'" } [ "Firenze" quote ] unit-test
   6 { "\"Caesar's\"" } [ "Caesar's" quote ] unit-test
   7 { "'Italy'" } [ "Italy" ?quote ] unit-test
   8 { "'Italy'" } [ "'Italy'" ?quote ] unit-test
   9 { "\"Italy\"" } [ "\"Italy\"" ?quote ] unit-test
  10 { "Italy" } [ "Italy" unquote ] unit-test
  11 { "Italy" } [ "'Italy'" unquote ] unit-test
  12 { "Italy" } [ "\"Italy\"" unquote ] unit-test