Delphi/pascalscript
Delphi/pascalscript
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #83 from FHannes/master

Browse Source 
Some minor changes
This commit is contained in:
Carlo Kok 2014-06-11 20:39:55 +02:00
commit 5d00e6cfb9
2 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
.gitignore vendored
View File

@ -1 +1,2 @@
*.dcu *.dcu
__history

2
Source/uPSCompiler.pas
View File

@ -3564,12 +3564,12 @@ var
h, l: Longint; h, l: Longint;
x: TPSProcedure; x: TPSProcedure;
begin begin
h := MakeHash(s);
if (s = 'RESULT') then if (s = 'RESULT') then
begin begin
Result := True; Result := True;
exit; exit;
end; end;
h := MakeHash(s);
if dcTypes in Check then if dcTypes in Check then
for l := FTypes.Count - 1 downto 0 do for l := FTypes.Count - 1 downto 0 do
begin begin