]> git.wincent.com - docvim.git/blobdiff - lib/Text/Docvim/AST.hs
Fix remaining warnings
[docvim.git] / lib / Text / Docvim / AST.hs
index 882d9cf02b28cef7fb48e0a05445a316379f4a92..58ef984ab71f7f1c3a1ea5be9f987a5f8598a1f0 100644 (file)
@@ -1,4 +1,5 @@
 {-# LANGUAGE DeriveDataTypeable #-}
+{-# LANGUAGE RankNTypes #-}
 
 module Text.Docvim.AST where
 
@@ -155,4 +156,5 @@ sanitizeAnchor = hyphenate . keepValid . downcase
     keepValid = filter (`elem` (['a'..'z'] ++ ['0'..'9'] ++ " -"))
     downcase = map toLower
 
+invalidNode :: forall t. t
 invalidNode = error "Invalid Node type"