#!/bin/sh

set -e
set -x

cd src
find . \( -name "gen.*" -o -name "*.o" -o -name "*.hi" \) -exec rm {} \;
ghc -c Control/Monad/Html/HtmlData.hs -fglasgow-exts
ghc -c Control/Monad/Html/HackTH.hs -fglasgow-exts
ghc -c Control/Monad/Html.hs -fglasgow-exts -fallow-undecidable-instances -cpp -DUSE_TH
find . \( -name "*.o" -o -name "*.hi" \) -exec rm {} \;
cd ..