diff --git a/Common.hs b/Common.hs
index c2bfd905588cf048ae6c8126369e33eb830ff959..915866a98e2fc4dec7c419e06acb5c5652322fab 100644
--- a/Common.hs
+++ b/Common.hs
@@ -21,7 +21,7 @@ die :: String -> IO a
 die s = hPutStr stderr s >> exitWith (ExitFailure 1)
 
 default_compiler :: String
-default_compiler = "gcc"
+default_compiler = "cc"
 
 ------------------------------------------------------------------------
 -- Write the output files.