iface.c 959 Bytes
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40
#include <stdlib.h>
#include <stdio.h>
#include <iface.h>

void check (JNIEnv *);

void check(JNIEnv *env)
{
  if ((*env)->ExceptionCheck(env) != JNI_FALSE)
    {
      fprintf(stderr, "UNEXPECTED EXCEPTION\n");
      exit(-1);
    }
}

void
Java_iface_doCalls (JNIEnv *env, jobject self, jobject other)
{
  jclass iface_class, comparable_class;
  jmethodID iface_meth, comparable_meth;
  jvalue args[1];

  iface_class = (*env)->FindClass(env, "iface");
  check (env);
  comparable_class = (*env)->FindClass (env, "mycomp");
  check (env);

  iface_meth = (*env)->GetMethodID (env, iface_class, "compareTo",
				    "(Ljava/lang/Object;)I");
  check (env);
  comparable_meth = (*env)->GetMethodID (env, comparable_class, "compareTo",
					 "(Ljava/lang/Object;)I");
  check (env);

  args[0].l = other;
  (*env)->CallObjectMethodA (env, self, iface_meth, args);
  check (env);
  (*env)->CallObjectMethodA (env, self, comparable_meth, args);
  check (env);
}