view src/clojure/clojure.cpp @ 53:9d0ec2614443

enabled stepping from clojure
author Robert McIntyre <rlm@mit.edu>
date Wed, 07 Mar 2012 02:31:39 -0600
parents 139178c4d843
children 719d910c90f8
line wrap: on
line source
1 #include "com_aurellem_gb_Gb.h"
2 #include "../sdl/Drive.h"
4 #include <string.h>
6 #define UNUSED(x) (void)(x)
9 /*
10 * Class: com_aurellem_gb_Gb
11 * Method: sayHello
12 * Signature: ()V
13 */
14 JNIEXPORT void JNICALL Java_com_aurellem_gb_Gb_sayHello
15 (JNIEnv *env, jclass clazz){
16 UNUSED(env);UNUSED(clazz);
17 printf("Hello from GB\n");
18 }
20 /*
21 * Class: com_aurellem_gb_Gb
22 * Method: startEmulator
23 * Signature: (Ljava/lang/String;)V
24 */
25 JNIEXPORT void JNICALL Java_com_aurellem_gb_Gb_startEmulator
26 (JNIEnv *env, jclass clazz, jstring str){
27 UNUSED(env);UNUSED(clazz);UNUSED(str);
29 const char *_romName = env->GetStringUTFChars(str, 0);
30 size_t len = strlen(_romName);
32 char romName[len + 1];
34 strcpy(romName, _romName);
36 char* arguments[] = {"vba-rlm", romName};
37 runVBA(2, arguments);
38 }
40 /*
41 * Class: com_aurellem_gb_Gb
42 * Method: step
43 * Signature: ()V
44 */
45 JNIEXPORT void JNICALL Java_com_aurellem_gb_Gb_step
46 (JNIEnv *env, jclass clazz){
47 step();
48 }
50 /*
51 * Class: com_aurellem_gb_Gb
52 * Method: shutdown
53 * Signature: ()V
54 */
55 JNIEXPORT void JNICALL Java_com_aurellem_gb_Gb_shutdown
56 (JNIEnv *env, jclass clazz){
57 shutdown();
58 }