Merge branch 'master' of http://git.megacz.com/coq-hetmet

diff --git a/examples/Makefile b/examples/Makefile
new file mode 100644 (file)
index 0000000..082c82e
--- /dev/null
+++ b/examples/Makefile
@@ -0,0 +1,12 @@
+all:
+       ../../../inplace/bin/ghc-stage2 -dcore-lint -fforce-recomp -fcoqpass -ddump-coqpass -ddump-to-file \
+               `ls *.hs | grep -v Regex | grep -v Unify.hs | grep -v GArrowTikZ.hs ` +RTS -K500M 
+       ../../../inplace/bin/ghc-stage2 -dcore-lint -fforce-recomp \
+               RegexMatcher.hs Unify.hs GArrowTikZ.hs
+
+tikz:
+       mkdir .build
+       ../../../inplace/bin/ghc-stage2 -odir .build -hidir .build GArrowTikZ.hs Unify.hs
+       ./GArrowTikZ > .build/test.tex
+       cd .build; pdflatex test.tex
+       open .build/test.pdf

diff --git a/src/Extraction-prefix.hs b/src/Extraction-prefix.hs
index fbe22cb..fbdae9b 100644 (file)
--- a/src/Extraction-prefix.hs
+++ b/src/Extraction-prefix.hs
@@ -1,3 +1,4 @@
+{-# OPTIONS_GHC -fno-warn-unused-matches -fno-warn-unused-binds #-}
 module CoqPass ( coqPassCoreToString, coqPassCoreToCore )
 where
 import qualified Unique