Преглед на файлове

Make sure the list is not empty.

git-svn-id: file:///var/svn/tigccpp/trunk@1083 9552661e-59e3-4036-b4f2-dbe53926924f
kevinkofler преди 17 години
родител
ревизия
ad2a839559
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      tigcc/ide/CodeCompletion/CompletionForm.pas

+ 1 - 1
tigcc/ide/CodeCompletion/CompletionForm.pas

@@ -329,7 +329,7 @@ begin
 		// Find Symbol
 		if List.Find(Symbol, i) then
 			T := ''
-		else if (i >= 0) and (i <= List.Count) then
+		else if (List.Count > 0) and (i >= 0) and (i <= List.Count) then
 		begin
 			if i = 0 then
 			begin