X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_console.pas;h=729bf956f956201f4c7a3787d9e1e59e4cdb98b4;hb=e0ef894b62b50d6a7bd7e1dfa42ee3f1a839403a;hp=df45e6ab722df26f38a9fde510ed1078c3e12c49;hpb=8b136462c6db8fd51aa6e0ec9604daf38c87eb49;p=d2df-sdl.git

diff --git a/src/game/g_console.pas b/src/game/g_console.pas
index df45e6a..729bf95 100644
--- a/src/game/g_console.pas
+++ b/src/game/g_console.pas
@@ -13,7 +13,7 @@
  * You should have received a copy of the GNU General Public License
  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  *)
-{$MODE DELPHI}
+{$INCLUDE ../shared/a_modes.inc}
 unit g_console;
 
 interface
@@ -388,6 +388,19 @@ begin
   AddCommand('d_player', DebugCommands);
   AddCommand('d_joy', DebugCommands);
 
+  AddCommand('pf_draw_frame', ProfilerCommands);
+  AddCommand('pf_update_frame', ProfilerCommands);
+  AddCommand('pf_coldet', ProfilerCommands);
+  AddCommand('r_sq_draw', ProfilerCommands);
+  AddCommand('r_sq_use_grid', ProfilerCommands);
+  AddCommand('r_sq_use_tree', ProfilerCommands);
+  AddCommand('dbg_sq_coldet', ProfilerCommands);
+
+  AddCommand('t_dump_node_queries', ProfilerCommands);
+
+  AddCommand('sq_use_grid', ProfilerCommands);
+  AddCommand('sq_use_tree', ProfilerCommands);
+
   AddCommand('p1_name', GameCVars);
   AddCommand('p2_name', GameCVars);
   AddCommand('p1_color', GameCVars);
@@ -915,7 +928,7 @@ begin
     while length(L) > 0 do
     begin
       f := Pos(#10, L);
-      if f < 0 then f := length(L)+1;
+      if f <= 0 then f := length(L)+1;
       conmsg(Copy(L, 1, f-1));
       Delete(L, 1, f);
     end;