#include <iostream>
#include <iomanip>

#include "JLang/JConversion.hh"

#include "Jeep/JParser.hh"
#include "Jeep/JMessage.hh"


namespace {

  struct __A__ {};

  struct __B__ : public __A__ {};

  /**
   * Print class parameters.
   *
   * \param  out         output stream
   * \param  uname       name of class
   * \param  vname       name of class
   */
  template<class U, class V>
  inline void print(std::ostream& out, const char* uname, const char* vname)
  {
    using namespace std;
    using namespace JPP;

    out << setw(36) << left << string("<") + string(uname) + string(",") + string(vname) + string(">");
    out << setw(4) << '.' << setw(8) << left << JConversion<U, V>::is_same;
    out << setw(4) << '.' << setw(8) << left << JConversion<U, V>::is_derived;
    out << endl;
  }
}


/**
 * Print class parameters.
 *
 * \param  OUT         output stream
 * \param  U           class
 * \param  V           class
 */
#define PRINT(OUT, U, V)   print<U,V>(OUT, #U, #V)


/**
 * \file
 *
 * Example program to test JLANG::JConversion class.
 * \author mdejong
 */
int main(int argc, char **argv)
{
  using namespace std;
  using namespace JPP;

  int debug;

  try {

    JParser<> zap("Example program to test class inspection.");

    zap['d'] = make_field(debug)     = 3;

    zap(argc, argv);
  }
  catch(const exception &error) {
    FATAL(error.what() << endl);
  }

  if (debug >= debug_t) {
    
    cout << setw(36) << left << "name";
    cout << setw(12) << "  same  ";
    cout << setw(12) << " derived";
    cout << endl;
    
    cout << setfill('.');
    
    PRINT(cout, __A__, __A__);
    PRINT(cout, __B__, __A__);
    PRINT(cout, __A__, __B__);
    PRINT(cout, __A__, __B__);
  }

  ASSERT(( JConversion<__A__, __A__>::is_same));
  ASSERT(( JConversion<__B__, __A__>::is_derived));
  ASSERT((!JConversion<__A__, __B__>::is_same));
  ASSERT((!JConversion<__A__, __B__>::is_derived));
}