hedgewars/hwLibrary.pas
changeset 7508 763d3961400b
parent 7500 6253cae96f21
child 7576 65d29988fd3d
--- a/hedgewars/hwLibrary.pas	Sat Aug 18 00:22:33 2012 +0200
+++ b/hedgewars/hwLibrary.pas	Sat Aug 18 00:47:51 2012 +0200
@@ -99,10 +99,14 @@
     JNI_HW_versionInfoVersion := envderef^.NewStringUTF(env, PChar(cVersionString));
 end;
 
-function JNI_HW_GenLandPreview(env: PJNIEnv; c: JClass; port: JInt):JInt; cdecl;
+procedure JNI_HW_GenLandPreview(env: PJNIEnv; c: JClass; port: JInt); cdecl;
 begin
 	GenLandPreview(port);
-	JNI_HW_GenLandPreview := port;
+end;
+
+procedure JNI_HW_Terminate(env: PJNIEnv; c: JClass); cdecl;
+begin
+	HW_terminate(false);
 end;
 
 exports
@@ -112,7 +116,7 @@
     HW_getNumberOfweapons name Java_Prefix + 'HWgetNumberOfWeapons',
     HW_getMaxNumberOfHogs name Java_Prefix + 'HWgetMaxNumberOfHogs',
     HW_getMaxNumberOfTeams name Java_Prefix + 'HWgetMaxNumberOfTeams',
-    HW_terminate name Java_Prefix + 'HWterminate',
+    JNI_HW_Terminate name Java_Prefix + 'HWterminate',
     Game;
 {$ELSE}
 exports