#include "inc/railgun.hpp"

#include <math.h>

double get_double(ObjList args) {
    HiObject* x = args->get(0);
    double y = 0;
    if (x->klass() == IntegerKlass::get_instance()) {
        y = ((HiInteger*)x)->value();
    }
    else if (x->klass() == DoubleKlass::get_instance()) {
        y = ((HiDouble*)x)->value();
    }
    return y;
}

HiObject* math_sqrt(ObjList args) {
    double x = get_double(args);
    return new HiDouble(sqrt(x));
}

HiObject* math_sin(ObjList args) {
    double x = get_double(args);
    return new HiDouble(sin(x));
}

RGMethod math_methods[] = {
    { "sin",  math_sin,  0, "sin(x)", },
    { "sqrt", math_sqrt, 0, "square root of x", },
    { NULL, NULL, 0, NULL, },
};

#ifdef __cplusplus
extern "C" {
#endif

SO_PUBLIC RGMethod* init_libmath() {
    return math_methods;
}

#ifdef __cplusplus
}
#endif