00001 #include <fiddle.h>
00002
00003 VALUE mFiddle;
00004
00005 void
00006 Init_fiddle(void)
00007 {
00008
00009
00010
00011
00012
00013
00014
00015
00016 mFiddle = rb_define_module("Fiddle");
00017
00018
00019
00020
00021
00022 rb_define_const(mFiddle, "TYPE_VOID", INT2NUM(TYPE_VOID));
00023
00024
00025
00026
00027
00028 rb_define_const(mFiddle, "TYPE_VOIDP", INT2NUM(TYPE_VOIDP));
00029
00030
00031
00032
00033
00034 rb_define_const(mFiddle, "TYPE_CHAR", INT2NUM(TYPE_CHAR));
00035
00036
00037
00038
00039
00040 rb_define_const(mFiddle, "TYPE_SHORT", INT2NUM(TYPE_SHORT));
00041
00042
00043
00044
00045
00046 rb_define_const(mFiddle, "TYPE_INT", INT2NUM(TYPE_INT));
00047
00048
00049
00050
00051
00052 rb_define_const(mFiddle, "TYPE_LONG", INT2NUM(TYPE_LONG));
00053
00054 #if HAVE_LONG_LONG
00055
00056
00057
00058
00059 rb_define_const(mFiddle, "TYPE_LONG_LONG", INT2NUM(TYPE_LONG_LONG));
00060 #endif
00061
00062
00063
00064
00065
00066 rb_define_const(mFiddle, "TYPE_FLOAT", INT2NUM(TYPE_FLOAT));
00067
00068
00069
00070
00071
00072 rb_define_const(mFiddle, "TYPE_DOUBLE", INT2NUM(TYPE_DOUBLE));
00073
00074
00075
00076
00077
00078 #if defined(_WIN32)
00079 rb_define_const(mFiddle, "WINDOWS", Qtrue);
00080 #else
00081 rb_define_const(mFiddle, "WINDOWS", Qfalse);
00082 #endif
00083
00084 Init_fiddle_function();
00085 Init_fiddle_closure();
00086 }
00087
00088