administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

bug fix #2043

Browse source
This commit is contained in:
Бондарев Иван 2019-07-14 19:13:20 +02:00
parent d56b2b1009
commit 72ed28d180
4 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
TestSuite/namespaces/nstypedef1.pas
View file

@ -1,5 +1,7 @@
namespace nstypedef;
uses System, System.Collections.Generic;
type
myint2 = integer;
myfnc = function(o: TClass): integer;

2
TestSuite/namespaces/nstypedef2.pas
View file

@ -1,5 +1,7 @@
namespace nstypedef;
uses System, System.Collections.Generic;
type IntList = List<integer>;
type TClass2 = class

2
TestSuite/use_ns_typedef.pas
View file

@ -2,7 +2,7 @@
{$includenamespace 'namespaces/nstypedef1.pas'}
{$includenamespace 'namespaces/nstypedef2.pas'}
uses nstypedef;
uses System, System.Collections.Generic, nstypedef;
begin
var i: myint2;
assert(i = 0);

2
TreeConverter/TreeConversion/syntax_tree_visitor.cs
View file

@ -10925,7 +10925,7 @@ namespace PascalABCCompiler.TreeConverter
}
scopes.Add(ns_scope2);
}
else
else if (si_list == null)
AddError(new NamespaceNotFound(nun.namespace_name.namespace_name, un.location));
}
}