uses-in + directives tests

TestSuite/usesunits/UsesInUnits3/1.txt

@@ -0,0 +1 @@
+abc

TestSuite/usesunits/UsesInUnits3/u.pas

@@ -0,0 +1,8 @@
+unit u;
+
+{$resource '1.txt'}
+{$reference 'uui3_lib.dll'}
+
+begin
+  Assert('abc' = System.IO.StreamReader.Create(GetResourceStream('1.txt')).ReadToEnd);
+end.

TestSuite/usesunits/UsesInUnits3/uui3_lib.pas

@@ -0,0 +1,3 @@
+library uui3_lib;
+
+end.

TestSuite/usesunits/uses_in3_derectives.pas

@@ -0,0 +1,3 @@
+uses u in 'UsesInUnits3\u';
+
+begin end.