Update OCaml bindings. Opaque types are gone, type holders are gone and the
[llvm/stm8.git] / utils / fpcmp / fpcmp.cpp
blob5f6b5e8d6e59bfea15fc1377424ec759b8dd39a4
1 //===- fpcmp.cpp - A fuzzy "cmp" that permits floating point noise --------===//
2 //
3 // The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // fpcmp is a tool that basically works like the 'cmp' tool, except that it can
11 // tolerate errors due to floating point noise, with the -r and -a options.
13 //===----------------------------------------------------------------------===//
15 #include "llvm/Support/CommandLine.h"
16 #include "llvm/Support/FileUtilities.h"
17 #include "llvm/Support/raw_ostream.h"
18 using namespace llvm;
20 namespace {
21 cl::opt<std::string>
22 File1(cl::Positional, cl::desc("<input file #1>"), cl::Required);
23 cl::opt<std::string>
24 File2(cl::Positional, cl::desc("<input file #2>"), cl::Required);
26 cl::opt<double>
27 RelTolerance("r", cl::desc("Relative error tolerated"), cl::init(0));
28 cl::opt<double>
29 AbsTolerance("a", cl::desc("Absolute error tolerated"), cl::init(0));
32 int main(int argc, char **argv) {
33 cl::ParseCommandLineOptions(argc, argv);
35 std::string ErrorMsg;
36 int DF = DiffFilesWithTolerance(sys::PathWithStatus(File1),
37 sys::PathWithStatus(File2),
38 AbsTolerance, RelTolerance, &ErrorMsg);
39 if (!ErrorMsg.empty())
40 errs() << argv[0] << ": " << ErrorMsg << "\n";
41 return DF;