t_point.cpp

Go to the documentation of this file.

/*****************************************************************************\
*                                                                             *
*  Name   : test_point                                                        *
*  Author : Chris Koeritz                                                     *
*                                                                             *
*  Purpose:                                                                   *
*                                                                             *
*    Tests out the point class.                                               *
*                                                                             *
*******************************************************************************
* Copyright (c) 2002-$now By Author.  This program is free software; you can  *
* redistribute it and/or modify it under the terms of the GNU General Public  *
* License as published by the Free Software Foundation; either version 2 of   *
* the License or (at your option) any later version.  This is online at:      *
*     http://www.fsf.org/copyleft/gpl.html                                    *
* Please send any updates to: fred@gruntose.com                               *
\*****************************************************************************/

#include <basis/guards.h>
#include <basis/istring.h>
#include <geometric/point.cpp>
#include <opsystem/application_shell.h>
#include <loggers/console_logger.h>
#include <data_struct/static_memory_gremlin.h>

using namespace geometric;

class test_point : public application_shell
{
public:
  test_point() : application_shell(class_name()) {}
  IMPLEMENT_CLASS_NAME("test_point");
  virtual int execute();
};

int test_point::execute()
{
  FUNCDEF("execute");
  {
    // first test just instantiates some things.
    point<double> fred(23, angle<double>(4));
    point<double> bob(399, angle<double>(2.3));
    double dist = bob.distance(fred);
//LOG(istring("fred is ") + fred + " and bob is " + bob);
//LOG(isprintf("distance between is ", dist));
    point<double> borg(fred - bob);
//LOG(istring("borg is fred-bob, which is ") + borg);
    if (borg.magnitude() - dist > 0.001)
      deadly_error(class_name(), func, "difference is too large");
  }

  {
    istring pt1 = "12,38";
    point<double> to_scan;
    to_scan.from_text(pt1);
    if ( (to_scan.x() != 12) || (to_scan.y() != 38) )
      deadly_error(class_name(), "second test", "1st from_text failed");
    istring pt2 = "{14.3,16.2989}";
    to_scan.from_text(pt2);
    if ( (to_scan.x() != 14.3) || (to_scan.y() != 16.2989) )
      deadly_error(class_name(), "second test", "2nd from_text failed");
  }

  guards::alert_message("point:: works for all functions tested.");

  return 0;
}

HOOPLE_MAIN(test_point, )

---