diff --git a/src/GF/Compile/Concrete/AppPredefined.hs b/src/GF/Compile/Concrete/AppPredefined.hs
index 95effb51d..95316a4ea 100644
--- a/src/GF/Compile/Concrete/AppPredefined.hs
+++ b/src/GF/Compile/Concrete/AppPredefined.hs
@@ -123,8 +123,8 @@ appPredefined t = case t of
 
 -- read makes variables into constants
 
-predefTrue = Q cPredef cPTrue
-predefFalse = Q cPredef cPFalse
+predefTrue = QC cPredef cPTrue
+predefFalse = QC cPredef cPFalse
 
 substring :: String -> String -> Bool
 substring s t = case (s,t) of