sc/qa/unit/functions_array.cxx

   1 #include "functions_test.hxx"
   2
   3 class ArrayFunctionsTest : public FunctionsTest
   4 {
   5 public:
   6     ArrayFunctionsTest();
   7
   8     void testArrayFormulasFODS();
   9     void testDubiousArrayFormulasFODS();
  10
  11     CPPUNIT_TEST_SUITE(ArrayFunctionsTest);
  12     CPPUNIT_TEST(testArrayFormulasFODS);
  13     CPPUNIT_TEST(testDubiousArrayFormulasFODS);
  14     CPPUNIT_TEST_SUITE_END();
  15
  16 };
  17
  18 void ArrayFunctionsTest::testArrayFormulasFODS()
  19 {
  20     OUString aDirectoryURL = m_directories.getURLFromSrc(u"/sc/qa/unit/data/functions/array/fods/");
  21     recursiveScan(test::pass, u"OpenDocument Spreadsheet Flat XML"_ustr, aDirectoryURL,
  22             u"com.sun.star.comp.filter.OdfFlatXml,,com.sun.star.comp.Calc.XMLOasisImporter,com.sun.star.comp.Calc.XMLOasisExporter,,,true"_ustr,
  23             FODS_FORMAT_TYPE, SotClipboardFormatId::NONE, 0, false);
  24 }
  25
  26 void ArrayFunctionsTest::testDubiousArrayFormulasFODS()
  27 {
  28     //TODO: sc/qa/unit/data/functions/array/dubious/fods/linest.fods produces widely different
  29     // values when built with -ffp-contract enabled (-ffp-contract=on default on Clang 14,
  30     // -ffp-contract=fast default when building with optimizations on GCC) on at least aarch64
  31     // and ppc64le. Thus limit the check only to platforms with consistent results.
  32 #if defined X86_64
  33     OUString aDirectoryURL
  34         = m_directories.getURLFromSrc(u"/sc/qa/unit/data/functions/array/dubious/fods/");
  35     recursiveScan(test::pass, u"OpenDocument Spreadsheet Flat XML"_ustr, aDirectoryURL,
  36             u"com.sun.star.comp.filter.OdfFlatXml,,com.sun.star.comp.Calc.XMLOasisImporter,com.sun.star.comp.Calc.XMLOasisExporter,,,true"_ustr,
  37             FODS_FORMAT_TYPE, SotClipboardFormatId::NONE, 0, false);
  38 #endif
  39 }
  40
  41 ArrayFunctionsTest::ArrayFunctionsTest():
  42     FunctionsTest()
  43 {
  44 }
  45
  46 CPPUNIT_TEST_SUITE_REGISTRATION(ArrayFunctionsTest);
  47
  48 CPPUNIT_PLUGIN_IMPLEMENT();
  49
  50 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */