X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=generator%2Fgenerator_ruby.ml;h=9ac35d7e1dd3d50003df08ad33ffe6558bada26c;hb=88f9599e1f55a440d34c93dae2e39d5574ffca7a;hp=7c8788d04895c679fbde910144914a288f4c04d3;hpb=e751293e10d5ecbb2ef43a61b9c153a1fc4f0304;p=libguestfs.git diff --git a/generator/generator_ruby.ml b/generator/generator_ruby.ml index 7c8788d..9ac35d7 100644 --- a/generator/generator_ruby.ml +++ b/generator/generator_ruby.ml @@ -214,7 +214,8 @@ ruby_event_callback_wrapper (guestfs_h *g, const uint64_t *array, size_t array_len) { size_t i; - VALUE eventv, event_handlev, bufv, arrayv, argv; + VALUE eventv, event_handlev, bufv, arrayv; + VALUE argv[5]; eventv = ULL2NUM (event); event_handlev = INT2NUM (event_handle); @@ -225,32 +226,30 @@ ruby_event_callback_wrapper (guestfs_h *g, for (i = 0; i < array_len; ++i) rb_ary_push (arrayv, ULL2NUM (array[i])); - /* Wrap up the arguments in an array which will be unpacked - * and passed as multiple arguments. This is a crap limitation - * of rb_rescue. + /* This is a crap limitation of rb_rescue. * http://blade.nagaokaut.ac.jp/cgi-bin/scat.rb/~poffice/mail/ruby-talk/65698 */ - argv = rb_ary_new2 (5); - rb_ary_store (argv, 0, * (VALUE *) data /* function */); - rb_ary_store (argv, 1, eventv); - rb_ary_store (argv, 2, event_handlev); - rb_ary_store (argv, 3, bufv); - rb_ary_store (argv, 4, arrayv); - - rb_rescue (ruby_event_callback_wrapper_wrapper, argv, + argv[0] = * (VALUE *) data; /* function */ + argv[1] = eventv; + argv[2] = event_handlev; + argv[3] = bufv; + argv[4] = arrayv; + + rb_rescue (ruby_event_callback_wrapper_wrapper, (VALUE) argv, ruby_event_callback_handle_exception, Qnil); } static VALUE -ruby_event_callback_wrapper_wrapper (VALUE argv) +ruby_event_callback_wrapper_wrapper (VALUE argvv) { + VALUE *argv = (VALUE *) argvv; VALUE fn, eventv, event_handlev, bufv, arrayv; - fn = rb_ary_entry (argv, 0); - eventv = rb_ary_entry (argv, 1); - event_handlev = rb_ary_entry (argv, 2); - bufv = rb_ary_entry (argv, 3); - arrayv = rb_ary_entry (argv, 4); + fn = argv[0]; + eventv = argv[1]; + event_handlev = argv[2]; + bufv = argv[3]; + arrayv = argv[4]; rb_funcall (fn, rb_intern (\"call\"), 4, eventv, event_handlev, bufv, arrayv); @@ -264,7 +263,7 @@ ruby_event_callback_handle_exception (VALUE not_used, VALUE exn) /* Callbacks aren't supposed to throw exceptions. The best we * can do is to print the error. */ - fprintf (stderr, \"libguestfs: exception in callback: %%s\", + fprintf (stderr, \"libguestfs: exception in callback: %%s\\n\", StringValueCStr (exn)); return Qnil;