Files
harbour-core/extras/hbdroid/hvminit.c
vszakats 9687850865 2013-03-16 02:10 UTC+0100 Viktor Szakats (harbour syenar.net)
* (all files)
    * stripped svn header
    * minor cleanups
    ; use following command to find out the history of files:
       git log
       git log --follow
       git blame
       git annotate
2013-03-16 02:11:42 +01:00

27 lines
405 B
C

#include "hbapi.h"
#include "hbvm.h"
#include "hbdroid.h"
/* MT support? */
static JNIEnv * s_env;
static jobject s_obj;
HB_EXPORT JNIEnv * __hbdroid_jni_env( void )
{
return s_env;
}
HB_EXPORT jobject __hbdroid_jni_obj( void )
{
return s_obj;
}
JNIEXPORT void JNICALL Java_test_test_Harbour_vmInit( JNIEnv * env, jobject obj, jint i )
{
s_env = env;
s_obj = obj;
hb_vmInit( i );
}