From: Ketmar Dark Date: Tue, 12 Sep 2017 20:48:50 +0000 (+0300) Subject: compiler hint fix X-Git-Url: https://deadsoftware.ru/gitweb?a=commitdiff_plain;h=cde380b2a554f452f7c2e2c6694bc29ce597ece9;p=d2df-sdl.git compiler hint fix --- diff --git a/src/game/g_saveload.pas b/src/game/g_saveload.pas index 4391bf5..dec46f1 100644 --- a/src/game/g_saveload.pas +++ b/src/game/g_saveload.pas @@ -294,7 +294,9 @@ var i: Integer; gameCleared: Boolean = false; curmapfile: AnsiString = ''; + {$IF DEFINED(D2F_DEBUG)} errpos: LongWord = 0; + {$ENDIF} begin result := false; @@ -306,7 +308,7 @@ begin e_WriteLog('Loading saved game...', MSG_NOTIFY); - try + {$IF DEFINED(D2F_DEBUG)}try{$ENDIF} //g_Game_Free(false); // don't free textures for the same map g_Game_ClearLoading(); g_Game_SetLoadingText(_lc[I_LOAD_SAVE_FILE], 0, False); @@ -476,12 +478,14 @@ begin // done gLoadGameMode := false; result := true; + {$IF DEFINED(D2F_DEBUG)} except begin errpos := LongWord(st.position); raise; end; end; + {$ENDIF} finally st.Free(); end;