hedgewars/uUtils.pas
changeset 6444 eddc1e9bcd81
parent 5932 5164d17b6374
child 6580 6155187bf599
equal deleted inserted replaced
6443:23364a5fcc86 6444:eddc1e9bcd81
   260 
   260 
   261 procedure AddFileLog(s: shortstring);
   261 procedure AddFileLog(s: shortstring);
   262 begin
   262 begin
   263 s:= s;
   263 s:= s;
   264 {$IFDEF DEBUGFILE}
   264 {$IFDEF DEBUGFILE}
   265 writeln(f, GameTicks: 6, ': ', s);
   265 writeln(f, GameTicks, ': ', s);
   266 flush(f)
   266 flush(f)
   267 {$ENDIF}
   267 {$ENDIF}
   268 end;
   268 end;
   269 
   269 
   270 
   270