source: trunk/test/Suite.cc @ 1304

Last change on this file since 1304 was 1304, checked in by Peter, 15 years ago

quantile normalization closes #288

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 2.9 KB
Line 
1// $Id: Suite.cc 1304 2008-05-14 20:11:57Z peter $
2
3/*
4  Copyright (C) 2008 Peter Johansson
5
6  This file is part of the yat library, http://trac.thep.lu.se/yat
7
8  The yat library is free software; you can redistribute it and/or
9  modify it under the terms of the GNU General Public License as
10  published by the Free Software Foundation; either version 2 of the
11  License, or (at your option) any later version.
12
13  The yat library is distributed in the hope that it will be useful,
14  but WITHOUT ANY WARRANTY; without even the implied warranty of
15  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16  General Public License for more details.
17
18  You should have received a copy of the GNU General Public License
19  along with this program; if not, write to the Free Software
20  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
21  02111-1307, USA.
22*/
23
24#include "Suite.h"
25#include "environment.h"
26
27#include <algorithm>
28#include <cmath>
29#include <fstream>
30#include <iostream>
31#include <sstream>
32#include <string>
33
34namespace theplu {
35namespace yat {
36namespace test {
37
38  Suite::Suite(int argc, char* argv[])
39    : ok_(true)
40  {
41    dev_null_ = new std::ofstream("/dev/null");
42    if (argc>1 && argv[1]==std::string("-v"))
43      verbose_ = true;
44    else {
45      verbose_ = false;
46      if (argc>1){
47        std::stringstream ss(argv[0]);
48        std::string prog;
49        while(getline(ss, prog, '/'));
50        if (prog.substr(0,3)=="lt-")
51          prog = prog.substr(3);
52        std::cout << prog << " -v : for printing extra information\n";
53      }
54    }
55  }
56
57
58  Suite::~Suite(void)
59  {
60    delete dev_null_;
61  }
62
63
64  bool Suite::add(bool ok)
65  {
66    ok_ = ok_ && ok;
67    return ok;
68  }
69
70
71  std::string filename(const std::string& path)
72  {
73    return abs_srcdir()+"/"+path;
74  }
75
76
77  std::ostream& Suite::err(void) const
78  {
79    if (verbose_)
80      return std::cerr;
81    return *dev_null_;
82  }
83
84
85  bool Suite::equal(double a, double b, unsigned long int n)
86  {
87    double last_error_bound = n*std::numeric_limits<double>().epsilon()*
88      std::min(std::abs(a), std::abs(b));
89    if (!(std::abs(a-b) <= last_error_bound)){
90      err() << "Error: Comparing " << a << " and " << b
91            << "\n  Difference: " << a - b
92            << "\n  expected difference to be at most " << last_error_bound
93            << std::endl;
94      return false;
95    }
96    return true;
97  }
98
99
100  bool Suite::equal_sqrt(double a, double b, unsigned long int n)
101  {
102    double last_error_bound = n*
103      std::sqrt(std::numeric_limits<double>().epsilon())*
104      std::min(std::abs(a), std::abs(b));
105    if (!(std::abs(a-b) <= last_error_bound)){
106      err() << "Error: Comparing " << a << " and " << b
107            << "\n  Difference: " << a - b
108            << "\n  expected difference to be at most " << last_error_bound
109            << std::endl;
110      return false;
111    }
112    return true;
113  }
114
115
116  bool Suite::ok(void) const
117  {
118    return ok_;
119  }
120
121
122  std::ostream& Suite::out(void) const
123  {
124    if (verbose_)
125      return std::cout;
126    return *dev_null_;
127  }
128
129
130  int Suite::return_value(void) const
131  {
132    if (ok()){
133      out() << "Test is ok.\n";
134      return 0;
135    }
136    out() << "Test failed.\n";
137    return -1;
138  }
139
140
141}}}
Note: See TracBrowser for help on using the repository browser.