/**
 * expttest.c
 *   Some unit testing of the expt procedure.
 */

#include <stdlib.h>
#include <stdio.h>
#include "expt.h"

int
main (int argc, char **argv)
{
  int exit_value = EXIT_SUCCESS;

  double d;
  int n;
  double current;
  double result;

  for (d = -3.5; d <= 5; d += 0.5)
    {
      current = 1;
      for (n = 0; n <= 10; n++)
        {
          result = expt (d, n);
          if (result != current)
            {
              fprintf (stderr, "For %lf^%d, expected %lf, got %lf.\n",
                       d, n, current, result);
              exit_value = EXIT_FAILURE;
            }
          current = current * d;
        } /* for n */
    } /* for d */

  exit (exit_value);
} /* main (int, char**) */