# HG changeset patch
# User sheepluva
# Date 1417627117 -3600
# Node ID ee460883729e7211375f349d7890bf74b92e7447
# Parent  7b72cf27cd041681091d1aef95a97505dab50328
unexpected return from lua test should not return exit status 0

diff -r 7b72cf27cd04 -r ee460883729e hedgewars/hwengine.pas
--- a/hedgewars/hwengine.pas	Wed Dec 03 17:59:31 2014 +0100
+++ b/hedgewars/hwengine.pas	Wed Dec 03 18:18:37 2014 +0100
@@ -587,6 +587,18 @@
         halt(HaltUsageError);
         {$ENDIF}
 
+    if cTestLua then
+        {$IFDEF PAS2C}
+        exit(HaltTestUnexpected);
+        {$ELSE}
+        halt(HaltTestUnexpected);
+        {$ENDIF}
+
+    {$IFDEF PAS2C}
+    exit(HaltNoError);
+    {$ELSE}
+    halt(HaltNoError);
+    {$ENDIF}
 {$IFDEF HWLIBRARY}
 end;
 {$ENDIF}
diff -r 7b72cf27cd04 -r ee460883729e hedgewars/uConsts.pas
--- a/hedgewars/uConsts.pas	Wed Dec 03 17:59:31 2014 +0100
+++ b/hedgewars/uConsts.pas	Wed Dec 03 18:18:37 2014 +0100
@@ -36,6 +36,7 @@
     HaltTestSuccess     =  0;
     HaltTestFailed      =  10;
     HaltTestLuaError    =  11;
+    HaltTestUnexpected  =  12;
 
 
     sfMax = 1000;