Match in types handled using top.

diff --git a/matita/matita/lib/preamble.hs b/matita/matita/lib/preamble.hs
index abc288aa4491d27edab6a2cb15f996e52df091d2..e196a2be3a66b632ec5a1bb1950dc87d95af817d 100644 (file)
--- a/matita/matita/lib/preamble.hs
+++ b/matita/matita/lib/preamble.hs
@@ -5,3 +5,5 @@ module Main where
 import Unsafe.Coerce
 import Prelude (error)
 import qualified Prelude
+
+data Top