From 1791623aeecb3ffe0026c5176d22110b91140f2b Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Mon, 3 Nov 2014 12:38:07 +0100
Subject: [PATCH] fixed possible list error when getting the outputFilename

---
 src/ce_project.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/ce_project.pas b/src/ce_project.pas
index 2b4c8ad8..98273150 100644
--- a/src/ce_project.pas
+++ b/src/ce_project.pas
@@ -300,6 +300,8 @@ begin
       result := getAbsoluteFilename(result);
     exit;
   end;
+  if Sources.Count = 0 then
+    exit;
   result := extractFilename(Sources.Strings[0]);
   result := result[1..length(result) - length(extractFileExt(result))];
   result := extractFilePath(fileName) + DirectorySeparator + result + exeExt;