Fix fpcrtl_strappendA, which cut last char from UserPathPrefix
leading to PHYSFS_setWriteDir fail with 'File not found' error,
which led to lack of writing dir and logFile handle being nil,
which led to crash on attempt to write to (absent) log file
#ifndef _FPCRTL_SYSUTILS_H_
#define _FPCRTL_SYSUTILS_H_
#include "Types.h"
// EFFECTS: return the current date time in pascal notation
// http://www.merlyn.demon.co.uk/del-prgg.htm#TDT
TDateTime fpcrtl_now();
#define now fpcrtl_now
#define Now fpcrtl_now
// EFFECTS: return the current time
// http://www.merlyn.demon.co.uk/del-prgg.htm#TDT
TDateTime fpcrtl_time();
// EFFECTS: return the current date
// http://www.merlyn.demon.co.uk/del-prgg.htm#TDT
TDateTime fpcrtl_date();
#define date fpcrtl_date
#define Date fpcrtl_date
// EFFECTS: Trim strips blank characters (spaces) at the beginning and end of S
// and returns the resulting string. Only #32 characters are stripped.
// If the string contains only spaces, an empty string is returned.
string255 fpcrtl_trim(string255 s);
#define trim fpcrtl_trim
#define Trim fpcrtl_trim
Integer fpcrtl_strToInt(string255 s);
#define StrToInt fpcrtl_strToInt
#define strToInt fpcrtl_strToInt
string255 fpcrtl_extractFileDir(string255 f);
#define fpcrtl_ExtractFileDir fpcrtl_extractFileDir
string255 fpcrtl_extractFileName(string255 f);
#define fpcrtl_ExtractFileName fpcrtl_extractFileName
string255 fpcrtl_strPas(PChar);
#define fpcrtl_StrPas fpcrtl_strPas
#endif