Commits

Anonymous committed 83d3530

Minor changes.

  • Participants
  • Parent commits 71f43fa

Comments (0)

Files changed (1)

 {
 	if (closure_AttachedToWindow)
 	{
-		return caml_callback(closure_AttachedToWindow, Val_unit);
+		caml_callback(closure_AttachedToWindow, Val_unit);
 	} else
 	{
 		BButton::AttachedToWindow();
 {
 	if (closure_KeyDown)
 	{
-		value arglist = { Val_string(bytes), Val_int(numBytes) };
-		return caml_callbackN(closure_KeyDown, 2, arglist);
+		value arglist [] = { caml_copy_string(bytes), Val_int(numBytes) };
+		caml_callbackN(closure_KeyDown, 2, arglist);
 	} else
 	{
 		BButton::KeyDown(bytes, numBytes);
 {
 	if (closure_MakeDefault)
 	{
-		value arglist = { Val_bool(flag) };
-		return caml_callbackN(closure_MakeDefault, 1, arglist);
+		value arglist [] = { Val_bool(flag) };
+		caml_callbackN(closure_MakeDefault, 1, arglist);
 	} else
 	{
 		BButton::MakeDefault(flag);
 {
 	if (closure_MouseDown)
 	{
-		value arglist = { (value)point };
-		return caml_callbackN(closure_MouseDown, 1, arglist);
+		value arglist [] = { (value)&point };
+		caml_callbackN(closure_MouseDown, 1, arglist);
 	} else
 	{
 		BButton::MouseDown(point);