form_wrap.c in ncursesw-1.4.10 vs form_wrap.c in ncursesw-1.4.11

@@ -1365,10 +1365,11 @@
   }
 
   /* Forms */
   rb_iv_set(mForm, "@forms_hash", rb_hash_new());
   cFORM  = rb_define_class_under(mForm, "FORM", rb_cObject);
+  rb_undef_alloc_func(cFORM);
   rb_define_singleton_method(cFORM, "new",
 									  (&rbncurs_m_new_form),
 									  1);
   RB_CLASS_METH(cFORM, NULL, current_field,0);
   RB_CLASS_METH(cFORM, NULL, data_ahead,0);
@@ -1411,26 +1412,27 @@
   RB_CLASS_METH(cFORM, "unpost", unpost_form,0);
 
   /* Fields */
   rb_iv_set(mForm, "@fields_hash", rb_hash_new());
   cFIELD = rb_define_class_under(mForm, "FIELD", rb_cObject);
+  rb_undef_alloc_func(cFIELD);
   rb_define_singleton_method(cFIELD, "new",
 									  (&rbncurs_m_new_field),
 									  6);
   RB_CLASS_METH(cFIELD, "dup", dup_field,2);
   RB_CLASS_METH(cFIELD, "dynamic_info", dynamic_field_info,3);
   RB_CLASS_METH(cFIELD, "arg", field_arg,0);
-  RB_CLASS_METH(cFIELD, "back", field_back,1);
+  RB_CLASS_METH(cFIELD, "back", field_back,0);
   RB_CLASS_METH(cFIELD, "buffer", field_buffer,1);
-  RB_CLASS_METH(cFIELD, "fore", field_fore,1);
+  RB_CLASS_METH(cFIELD, "fore", field_fore,0);
   RB_CLASS_METH(cFIELD, "index", field_index,0);
   RB_CLASS_METH(cFIELD, "info", field_info,6);
   RB_CLASS_METH(cFIELD, "just", field_just,0);
   RB_CLASS_METH(cFIELD, "opts", field_opts,0);
   RB_CLASS_METH(cFIELD, "opts_off", field_opts_off,1);
   RB_CLASS_METH(cFIELD, "opts_on", field_opts_on,1);
-  RB_CLASS_METH(cFIELD, "pad", field_pad,1);
+  RB_CLASS_METH(cFIELD, "pad", field_pad,0);
   RB_CLASS_METH(cFIELD, "status", field_status,0);
   RB_CLASS_METH(cFIELD, "type", field_type,0);
   /*   RB_CLASS_METH(cFIELD, "userptr", field_userptr,0); */
   RB_CLASS_METH(cFIELD, "free", free_field,0);
   RB_CLASS_METH(cFIELD, "link", link_field,2);
@@ -1452,9 +1454,10 @@
 
 
   /* Field types */
   rb_iv_set(mForm, "@fieldtypes_hash", rb_hash_new());
   cFIELDTYPE = rb_define_class_under(mForm, "FIELDTYPE", rb_cObject);
+  rb_undef_alloc_func(cFIELDTYPE);
   rb_define_singleton_method(cFIELDTYPE, "new",
 									  (&rbncurs_m_new_fieldtype),
 									  2);
   RB_CLASS_METH(cFIELDTYPE, "free", free_fieldtype,0);
   RB_CLASS_METH(cFIELDTYPE, "link", link_fieldtype,1);