* src/native/vm/sun/jvm.c (TRACEJVMCALLSENTER, TRACEJVMCALLSEXIT): New
authorChristian Thalinger <twisti@complang.tuwien.ac.at>
Wed, 2 Apr 2008 12:40:25 +0000 (14:40 +0200)
committerChristian Thalinger <twisti@complang.tuwien.ac.at>
Wed, 2 Apr 2008 12:40:25 +0000 (14:40 +0200)
macro.
(JVM_GetClassLoader): Trace return value.

src/native/vm/sun/jvm.c

index 902a7c51d5f4f1e498fd9bdecca06e8f4c5d6b14..3c2eada2c4b0e5459c956287afe78e45386395c4 100644 (file)
         }                                                                                                              \
     } while (0)
 
+# define TRACEJVMCALLSENTER(x)                                                                 \
+    do {                                                                                                               \
+        if (opt_TraceJVMCalls || opt_TraceJVMCallsVerbose) {   \
+                       log_start();                                                                            \
+            log_print x;                                                                               \
+        }                                                                                                              \
+    } while (0)
+
+# define TRACEJVMCALLSEXIT(x)                                                                  \
+    do {                                                                                                               \
+        if (opt_TraceJVMCalls || opt_TraceJVMCallsVerbose) {   \
+                       log_print x;                                                                            \
+                       log_finish();                                                                           \
+        }                                                                                                              \
+    } while (0)
+
 # define TRACEJVMCALLSVERBOSE(x)                               \
     do {                                                                               \
         if (opt_TraceJVMCallsVerbose) {                        \
 #else
 
 # define TRACEJVMCALLS(x)
+# define TRACEJVMCALLSENTER(x)
+# define TRACEJVMCALLSEXIT(x)
 # define TRACEJVMCALLSVERBOSE(x)
 # define PRINTJVMWARNINGS(x)
 
@@ -891,11 +909,13 @@ jobject JVM_GetClassLoader(JNIEnv *env, jclass cls)
        classinfo   *c;
        classloader *cl;
 
-       TRACEJVMCALLS(("JVM_GetClassLoader(env=%p, cls=%p)", env, cls));
+       TRACEJVMCALLSENTER(("JVM_GetClassLoader(env=%p, cls=%p)", env, cls));
 
        c  = LLNI_classinfo_unwrap(cls);
        cl = class_get_classloader(c);
 
+       TRACEJVMCALLSEXIT(("->%p", cl));
+
        return (jobject) cl;
 }