Minor fixes for QualifiedMethodExpr code

Author: dmiller

Clojure/Clojure/CljCompiler/Ast/InvokeExpr.cs

@@ -270,8 +270,8 @@ static Expr ToHostExpr(ParserContext pcon, QualifiedMethodExpr qmfexpr, Symbol t
                         return new InstanceMethodExpr(
                             (string)Compiler.SourceVar.deref(),
                             (IPersistentMap)Compiler.SourceSpanVar.deref(),
-                            tag, 
-                            (Expr)RT.first(processedArgs),
+                            tag,
+                            Compiler.Analyze(pcon.EvalOrExpr(), RT.first(processedArgs)),
                             qmfexpr.MethodType,
                             Compiler.munge(qmfexpr.MethodName), 
                             (MethodInfo)method,
@@ -306,8 +306,8 @@ static Expr ToHostExpr(ParserContext pcon, QualifiedMethodExpr qmfexpr, Symbol t
                         return new InstanceMethodExpr(
                             (string)Compiler.SourceVar.deref(),
                             (IPersistentMap)Compiler.SourceSpanVar.deref(),
-                            tag, 
-                            (Expr)RT.first(processedArgs),
+                            tag,
+                            Compiler.Analyze(pcon.EvalOrExpr(), RT.first(processedArgs)),
                             qmfexpr.MethodType,
                             Compiler.munge(qmfexpr.MethodName),
                             genericTypeArgs,

Clojure/Clojure/CljCompiler/Ast/QualifiedMethodExpr.cs

@@ -202,7 +202,7 @@ internal static MethodBase ResolveHintedMethod(Type t, string methodName, EMetho
 
         private static ArgumentException NoMethodWithNameException(Type t, string methodName, EMethodKind kind)
         {
-            string kindStr = kind == EMethodKind.CTOR ? "" : kind.ToString().ToLower() + " ";
+            string kindStr = kind == EMethodKind.CTOR ? "" : kind.ToString().ToLower();
             return new ArgumentException($"Error - no matches found for {kindStr} {Compiler.MethodDescription(t, methodName)}");
         }
 

Clojure/Clojure/CljCompiler/Compiler.cs

@@ -422,7 +422,7 @@ internal static bool SignatureMatches(List<Type> sig, MethodBase method)
 
             for ( int i=0; i<methodSig.Length; i++ )
             {
-                if (sig[i] != null && !sig[i].Equals(methodSig[i]))
+                if (sig[i] != null && !sig[i].Equals(methodSig[i].ParameterType))
                     return false;
             }
 
@@ -448,7 +448,7 @@ public static string MethodDescription(Type t, string name)
         {
             bool isCtor = t != null && name.Equals("new");
             string type = isCtor ? "constructor" : "method";
-            return $"{type}{(isCtor ? "" : name)} in class {t.Name}";
+            return $"{type} {(isCtor ? "" : name)} in class {t.Name}";
         }