--- a/JavaNativeMethodImpl_OpenJDK7.st Mon Nov 11 17:27:08 2013 +0000
+++ b/JavaNativeMethodImpl_OpenJDK7.st Mon Nov 11 21:20:14 2013 +0000
@@ -533,6 +533,30 @@
^ JavaVM unimplementedNativeMethodSignal raise
! !
+!JavaNativeMethodImpl_OpenJDK7 class methodsFor:'native - sun.reflect'!
+
+_sun_reflect_Reflection_getCallerClass0: this _: a1
+
+ <javanative: 'sun/reflect/Reflection' name: 'getCallerClass0(I)Ljava/lang/Class;'>
+
+ "/ Until there is hotspot @CallerSensitive support,
+ "/ depth must always be 2 to get the immediate caller
+ ^ self _sun_reflect_Reflection_getCallerClass: this _: 2
+
+ "Modified (comment): / 11-11-2013 / 21:18:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+_sun_reflect_Reflection_getCallerClass: this
+
+ <javanative: 'sun/reflect/Reflection' name: 'getCallerClass()Ljava/lang/Class;'>
+
+ "/ Until there is hotspot @CallerSensitive support,
+ "/ depth must always be 2 to get the immediate caller
+ ^ self _sun_reflect_Reflection_getCallerClass0: this _: 2
+
+ "Modified (comment): / 11-11-2013 / 21:18:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
!JavaNativeMethodImpl_OpenJDK7 class methodsFor:'documentation'!
version_CVS