url decodes problems

ComputingServices/ComputingServices/Taskhost.d/Linq/LinqPool.vb

@@ -40,7 +40,7 @@ Namespace TaskHost
         ''' </param>
         ''' <returns></returns>
         Public Function OpenQuery(source As IEnumerable, type As Type) As IPEndPoint
-            Dim elType As Type = type.GetArrayElement(True)
+            Dim elType As Type = type.GetTypeElement(True)
             If elType Is Nothing Then
                 elType = type
             End If

LINQ/TestMain/Module1.vb

@@ -58,7 +58,7 @@ Module Module1
                          MsgBox("test2")
 
 
-                         Dim lquerrrr = (From i As Integer In 1000000.SeqIterator.AsParallel Select "http://127.0.0.1/test123.vb".GetRequest).ToArray
+                         Dim lquerrrr = (From i As Integer In 1000000.SeqIterator.AsParallel Select "http://127.0.0.1/test123.vb".GetRequest.__DEBUG_ECHO).ToArray
                          MsgBox("DONE!")
                          For i As Integer = 0 To 100000
                              Call Trace.WriteLine("http://127.0.0.1/test123.vb".GET)

RQL/Repository/Repository.vb

@@ -27,6 +27,13 @@ Namespace Linq
         Sub New()
             __api = APIProvider.LoadDefault
             __types = TypeRegistry.LoadDefault
+            __compiler = New DynamicCompiler(__types, __api)
+        End Sub
+
+        Sub New(compiler As DynamicCompiler)
+            __compiler = compiler
+            __api = compiler.ApiProvider
+            __types = compiler.EntityProvider
         End Sub
 
         Public Sub AddLinq(url As String, resource As String, Linq As GetLinqResource)