Permalink
Browse files

Marked us Trustworthy where necessary.

  • Loading branch information...
1 parent 2febe17 commit 6738f3280d4dd8a847831dd8c4f87e48d9819729 @ekmett committed Dec 8, 2012
View
2 lens.cabal
@@ -1,6 +1,6 @@
name: lens
category: Data, Lenses
-version: 3.7.0.1
+version: 3.7.0.2
license: BSD3
cabal-version: >= 1.8
license-file: LICENSE
View
5 src/Control/Exception/Lens.hs
@@ -1,6 +1,11 @@
+{-# LANGUAGE CPP #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE ScopedTypeVariables #-}
+#ifdef TRUSTWORTHY
+{-# LANGUAGE Trustworthy #-}
+#endif
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Exception.Lens
View
4 src/Control/Lens/Fold.hs
@@ -1,9 +1,13 @@
+{-# LANGUAGE CPP #-}
{-# LANGUAGE MagicHash #-}
{-# LANGUAGE Rank2Types #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE LiberalTypeSynonyms #-}
{-# LANGUAGE UndecidableInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
+#ifdef TRUSTWORTHY
+{-# LANGUAGE Trustworthy #-}
+#endif
----------------------------------------------------------------------------
-- |
-- Module : Control.Lens.Fold
View
4 src/Control/Lens/IndexedSetter.hs
@@ -1,9 +1,13 @@
+{-# LANGUAGE CPP #-}
{-# LANGUAGE MagicHash #-}
{-# LANGUAGE Rank2Types #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE FlexibleContexts #-}
+#ifdef TRUSTWORTHY
+{-# LANGUAGE Trustworthy #-}
+#endif
-----------------------------------------------------------------------------
-- |
-- Module : Control.Lens.IndexedSetter
View
4 src/Control/Lens/Internal/Zipper.hs
@@ -6,6 +6,10 @@
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
+#ifdef TRUSTWORTHY
+{-# LANGUAGE Trustworthy #-}
+#endif
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Lens.Internal.Zipper
View
3 src/Control/Lens/Loupe.hs
@@ -1,4 +1,7 @@
{-# LANGUAGE CPP #-}
+#ifdef TRUSTWORTHY
+{-# LANGUAGE Trustworthy #-}
+#endif
#ifndef MIN_VERSION_mtl
#define MIN_VERSION_mtl(x,y,z) 1
View
4 src/Control/Lens/Representable.hs
@@ -1,6 +1,10 @@
+{-# LANGUAGE CPP #-}
{-# LANGUAGE MagicHash #-}
{-# LANGUAGE RankNTypes #-}
{-# LANGUAGE FlexibleContexts #-}
+#ifdef TRUSTWORTHY
+{-# LANGUAGE Trustworthy #-}
+#endif
-----------------------------------------------------------------------------
-- |
-- Module : Control.Lens.Representable
View
4 src/Control/Lens/Traversal.hs
@@ -5,6 +5,10 @@
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE LiberalTypeSynonyms #-}
{-# LANGUAGE ScopedTypeVariables #-}
+#ifdef TRUSTWORTHY
+{-# LANGUAGE Trustworthy #-}
+#endif
+
#ifndef MIN_VERSION_mtl
#define MIN_VERSION_mtl(x,y,z) 1
#endif
View
4 src/Control/Lens/Tuple.hs
@@ -4,6 +4,10 @@
{-# LANGUAGE FunctionalDependencies #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE UndecidableInstances #-}
+#ifdef TRUSTWORTHY
+{-# LANGUAGE Trustworthy #-}
+#endif
+
-------------------------------------------------------------------------------
-- |
-- Module : Control.Lens.Tuple
View
4 src/Control/Lens/Type.hs
@@ -5,6 +5,10 @@
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE UndecidableInstances #-}
{-# LANGUAGE TypeOperators #-}
+#ifdef TRUSTWORTHY
+{-# LANGUAGE Trustworthy #-}
+#endif
+
#ifndef MIN_VERSION_mtl
#define MIN_VERSION_mtl(x,y,z) 1
View
5 src/Control/Lens/Wrapped.hs
@@ -1,9 +1,14 @@
+{-# LANGUAGE CPP #-}
{-# LANGUAGE Rank2Types #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE TypeSynonymInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE FunctionalDependencies #-}
+#ifdef TRUSTWORTHY
+{-# LANGUAGE Trustworthy #-}
+#endif
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Lens.Wrapped

0 comments on commit 6738f32

Please sign in to comment.