From b0e2912d3e5285300d2fd33a9414d3fd4bcc1a75 Mon Sep 17 00:00:00 2001 From: Matthias Benkard Date: Tue, 4 Mar 2008 12:59:34 +0100 Subject: Objective-C layer: Add more debugging aids. darcs-hash:ba7da4d9099567eea4884179b479210d61651ad1 --- Objective-C/libobjcl.m | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'Objective-C') diff --git a/Objective-C/libobjcl.m b/Objective-C/libobjcl.m index 85fc492..eb6bdd6 100644 --- a/Objective-C/libobjcl.m +++ b/Objective-C/libobjcl.m @@ -215,7 +215,7 @@ objcl_invoke_with_types (int argc, either. */ method = objcl_get_method_implementation (receiver, method_selector, superclass_for_send_super); - TRACE (@"method == NULL"); + TRACE (@"method ?= NULL"); if (method == NULL) [[NSException exceptionWithName: @"MLKNoApplicableMethod" reason: @"Tried to call a non-existent method." @@ -678,6 +678,8 @@ imp_closure (ffi_cif *cif, void *result, void **args, void *user_data) { id exception; + TRACE (@"imp-closure"); + ffi_call (cif, user_data, result, args); exception = objcl_current_exception; @@ -686,6 +688,8 @@ imp_closure (ffi_cif *cif, void *result, void **args, void *user_data) if (exception != nil) [exception raise]; + + TRACE (@"imp-closure => %"); } -- cgit v1.2.3