Fix for dotnet#30

Code was comparing a pre-erasure list of arguments with a post-erasure list
andrewjkennedy · Jan 28, 2015 · 72635a9 · 72635a9
1 parent f6cea7c
commit 72635a9
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/fsharp/ilxgen.fs b/src/fsharp/ilxgen.fs
@@ -2746,7 +2746,7 @@ and GenNamedLocalTyFuncCall cenv (cgbuf: CodeGenBuffer) eenv typ cloinfo tyargs
 
     let ilContractTy = mkILBoxedTy ilContractCloTySpec.TypeRef ilContractClassTyargs
 
-    if not (ilContractMethTyargs.Length = tyargs.Length) then errorR(Error(FSComp.SR.ilIncorrectNumberOfTypeArguments(),m));
+    if not (ilContractMethTyargs.Length = ilTyArgs.Length) then errorR(Error(FSComp.SR.ilIncorrectNumberOfTypeArguments(),m));
 
     // Local TyFunc are represented as a $contract type. they currently get stored in a value of type object
     // Recover result (value or reference types) via unbox_any.