Changeset 107 for trunk/UTarget.pas

Timestamp:

May 6, 2019, 1:40:27 PM (6 years ago)

Author:

chronos

Message:

• Added: Javascript target.

File:

• trunk/UTarget.pas (modified) (2 diffs)

trunk/UTarget.pas

@@ -411 +411 @@
     'compiled' + DirectorySeparator + Name + DirectorySeparator +
     ExtractFileNameOnly(ProjectFileName) + SourceExtension;
-  ForceDirectoriesUTF8(ExtractFilePath(CompiledFile));
+  ForceDirectories(ExtractFilePath(CompiledFile));
   with TStringList.Create do
   try
@@ -459 +459 @@
   if not FileExistsUTF8(ExecutorPath) then
     raise Exception.Create(Format(SExecutorNotFound, [ExecutorPath]));
-  if FileExistsUTF8(CompiledFile) then
+  if FileExists(CompiledFile) then
   try
     Process := TProcess.Create(nil);