This module provides a more pleasant way to write C ASTs for language-c As a simple example,

 {-# LANGUAGE OverloadedStrings #-}

 import Language.C.DSL

 example :: CFunDef
 example =
   fun [intTy] "foo"[int "a", int "b"] $ block [
       creturn $ "a" + "b"
   ]

And when loaded into GHCi

 Main*> pretty example
 int foo(int a, int b)
 {
   return a + b;
 }

This module also exports Language.C for simplicity.