Fix a case where dotnet#95 is violated in the compiler itself

forki · Jan 26, 2015 · 416ea92 · 416ea92
1 parent 207462e
commit 416ea92
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/fsharp/check.fs b/src/fsharp/check.fs
@@ -1471,6 +1471,6 @@ let CheckTopImpl (g,amap,reportErrors,infoReader,internalsVisibleToPaths,viewCcu
 
     CheckModuleExpr cenv env mexpr;
     CheckAttribs cenv env extraAttribs;
-    if cenv.usesQuotations && QuotationTranslator.QuotationGenerationScope.ComputeQuotationFormat(cenv.g) = QuotationTranslator.FSharp_20_Plus then 
+    if cenv.usesQuotations && QuotationTranslator.QuotationGenerationScope.ComputeQuotationFormat(cenv.g) = QuotationTranslator.QuotationSerializationFormat.FSharp_20_Plus then 
         viewCcu.UsesFSharp20PlusQuotations <- true
     cenv.entryPointGiven