* use directory separator from System unit

git-svn-id: trunk@12794 -
This commit is contained in:
Károly Balogh 2009-02-25 21:28:41 +00:00
parent 7798d6a265
commit d800d165de

View File

@ -19,14 +19,14 @@ interface
uses Objects;
const
dirsep = System.DirectorySeparator;
{$ifdef Unix}
dirsep = '/';
listsep = [';',':'];
exeext = '';
pasext = '.pas';
ppext = '.pp';
{$else}
dirsep = '\';
listsep = [';'];
exeext = '.exe';
pasext = '.pas';