Ruby 1.9.3p327(2012-11-10revision37606)
|
00001 #include <fiddle.h> 00002 00003 VALUE mFiddle; 00004 00005 void 00006 Init_fiddle(void) 00007 { 00008 /* 00009 * Document-module: Fiddle 00010 * 00011 * == Description 00012 * 00013 * A libffi wrapper. 00014 * 00015 */ 00016 mFiddle = rb_define_module("Fiddle"); 00017 00018 /* Document-const: TYPE_VOID 00019 * 00020 * C type - void 00021 */ 00022 rb_define_const(mFiddle, "TYPE_VOID", INT2NUM(TYPE_VOID)); 00023 00024 /* Document-const: TYPE_VOIDP 00025 * 00026 * C type - void* 00027 */ 00028 rb_define_const(mFiddle, "TYPE_VOIDP", INT2NUM(TYPE_VOIDP)); 00029 00030 /* Document-const: TYPE_CHAR 00031 * 00032 * C type - char 00033 */ 00034 rb_define_const(mFiddle, "TYPE_CHAR", INT2NUM(TYPE_CHAR)); 00035 00036 /* Document-const: TYPE_SHORT 00037 * 00038 * C type - short 00039 */ 00040 rb_define_const(mFiddle, "TYPE_SHORT", INT2NUM(TYPE_SHORT)); 00041 00042 /* Document-const: TYPE_INT 00043 * 00044 * C type - int 00045 */ 00046 rb_define_const(mFiddle, "TYPE_INT", INT2NUM(TYPE_INT)); 00047 00048 /* Document-const: TYPE_LONG 00049 * 00050 * C type - long 00051 */ 00052 rb_define_const(mFiddle, "TYPE_LONG", INT2NUM(TYPE_LONG)); 00053 00054 #if HAVE_LONG_LONG 00055 /* Document-const: TYPE_LONG_LONG 00056 * 00057 * C type - long long 00058 */ 00059 rb_define_const(mFiddle, "TYPE_LONG_LONG", INT2NUM(TYPE_LONG_LONG)); 00060 #endif 00061 00062 /* Document-const: TYPE_FLOAT 00063 * 00064 * C type - float 00065 */ 00066 rb_define_const(mFiddle, "TYPE_FLOAT", INT2NUM(TYPE_FLOAT)); 00067 00068 /* Document-const: TYPE_DOUBLE 00069 * 00070 * C type - double 00071 */ 00072 rb_define_const(mFiddle, "TYPE_DOUBLE", INT2NUM(TYPE_DOUBLE)); 00073 00074 /* Document-const: WINDOWS 00075 * 00076 * Returns a boolean regarding whether the host is WIN32 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 /* vim: set noet sws=4 sw=4: */ 00088