On 05/23/2011 01:05 PM, Gwenael Casaccio wrote:
diff --git a/libgst/comp.c b/libgst/comp.c
index 0819e96..9cc5986 100644
--- a/libgst/comp.c
+++ b/libgst/comp.c
@@ -2481,8 +2481,11 @@ install_method (OOP methodOOP, OOP classOOP, mst_Boolean 
untrusted)
      }

    MAKE_OOP_READONLY (methodOOP, true);
-  oldMethod = _gst_identity_dictionary_at_put (methodDictionaryOOP,
-                                              selector, methodOOP);
+  if (_gst_kernel_initialized)
+      _gst_msg_sendf (&oldMethod, "%o %o at: %o put: %o", methodDictionaryOOP, 
selector, methodOOP);
+  else
+    oldMethod = _gst_identity_dictionary_at_put (methodDictionaryOOP,
+                                              selector, methodOOP);

  #ifdef ENABLE_JIT_TRANSLATION
    if (oldMethod != _gst_nil_oop)

Applied to master branch, thanks.

Paolo

_______________________________________________
help-smalltalk mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/help-smalltalk

Reply via email to