Preserve ALLCAPS class names, but this does not apply to ALL_CAPS which becomes AllCaps.

Author: cfis

lib/ruby-bindgen/refinements/string.rb

@@ -14,6 +14,8 @@ def camelize()
       return self.capitalize
     end
 
+    return self if self.match?(/\A[A-Z]+\z/)
+
     input = self.match?(/\A[A-Z_0-9]*\z/) ? self.downcase : self
     string = input.sub(/^[a-z\d]*/) { |match| match.capitalize! || match }
     string.gsub!(/\/, ::/)

test/bindings/cpp/default_values-rb.cpp

@@ -64,7 +64,7 @@ void Init_DefaultValues()
     .define_attr("max_val", &ml::ParamGrid::maxVal)
     .define_attr("log_step", &ml::ParamGrid::logStep);
 
-  Rice::Data_Type<ml::SVM> rb_cMlSVM = define_class_under<ml::SVM>(rb_mMl, "Svm")
+  Rice::Data_Type<ml::SVM> rb_cMlSVM = define_class_under<ml::SVM>(rb_mMl, "SVM")
     .define_constructor(Constructor<ml::SVM>())
     .define_singleton_function<ml::ParamGrid(*)(int)>("get_default_grid", &ml::SVM::getDefaultGrid,
       Arg("param_id"))