X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2FDoom2DF.dpr;h=4123df2e5e01d8d69b15e4f75040e4b8b90528c5;hb=5aa51582e429a852142d419b1e3c23d93d31bc0b;hp=1c062498bddd7673711a5412121e4bed26b758d2;hpb=8f815647c61a98e32b85066bf245b262694ac634;p=d2df-sdl.git diff --git a/src/game/Doom2DF.dpr b/src/game/Doom2DF.dpr index 1c06249..4123df2 100644 --- a/src/game/Doom2DF.dpr +++ b/src/game/Doom2DF.dpr @@ -1,3 +1,18 @@ +(* Copyright (C) DooM 2D:Forever Developers + * + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . + *) {$MODE DELPHI} program Doom2DF; {$IFNDEF HEADLESS} @@ -24,6 +39,7 @@ program Doom2DF; {$ENDIF} uses + conbuf in '../shared/conbuf.pas', GL, GLExt, SDL2 in '../lib/sdl2/sdl2.pas', @@ -31,12 +47,6 @@ uses SDL2_mixer in '../lib/sdl2/SDL2_mixer.pas', {$ENDIF} ENet in '../lib/enet/enet.pp', - ENetTypes in '../lib/enet/enettypes.pp', - ENetList in '../lib/enet/enetlist.pp', - ENetTime in '../lib/enet/enettime.pp', - ENetProtocol in '../lib/enet/enetprotocol.pp', - ENetCallbacks in '../lib/enet/enetcallbacks.pp', - ENetPlatform in '../lib/enet/enetplatform.pp', e_graphics in '../engine/e_graphics.pas', e_input in '../engine/e_input.pas', e_log in '../engine/e_log.pas', @@ -60,6 +70,8 @@ uses g_nethandler in 'g_nethandler.pas', g_netmaster in 'g_netmaster.pas', g_res_downloader in 'g_res_downloader.pas', + g_grid in 'g_grid.pas', + z_aabbtree in 'z_aabbtree.pas', g_game in 'g_game.pas', g_gfx in 'g_gfx.pas', g_gui in 'g_gui.pas', @@ -85,7 +97,10 @@ uses fmodpresets in '../lib/FMOD/fmodpresets.pas', fmodtypes in '../lib/FMOD/fmodtypes.pas', {$ENDIF} + xprofiler in '../shared/xprofiler.pas', + binheap in '../shared/binheap.pas', BinEditor in '../shared/BinEditor.pas', + envvars in '../shared/envvars.pas', g_panel in 'g_panel.pas', g_language in 'g_language.pas', ImagingTypes, @@ -101,7 +116,11 @@ var f: Integer; noct: Boolean = false; begin - for f := 1 to ParamCount do if ParamStr(f) = '--gdb' then noct := true; + for f := 1 to ParamCount do + begin + if ParamStr(f) = '--gdb' then noct := true + else if ParamStr(f) = '--log' then conbufDumpToStdOut := true; + end; if noct then Main() else @@ -112,6 +131,6 @@ begin on E: Exception do e_WriteLog(Format(_lc[I_SYSTEM_ERROR_MSG], [E.Message]), MSG_FATALERROR); else - e_WriteLog(Format(_lc[I_SYSTEM_ERROR_UNKNOWN], [LongWord(ExceptAddr())]), MSG_FATALERROR); + e_WriteLog(Format(_lc[I_SYSTEM_ERROR_UNKNOWN], [NativeUInt(ExceptAddr())]), MSG_FATALERROR); end; end.