Permalink
Browse files

prepare include file.

  • Loading branch information...
Takayuki Muranushi
Takayuki Muranushi committed Feb 8, 2012
1 parent 1b46f07 commit 728a52f7f37a9ed8c54480b22f7ffbbc2112cfce
Showing with 13 additions and 8 deletions.
  1. +3 −6 Language/Paraiso/Prelude.hs
  2. +5 −2 Paraiso.cabal
  3. +5 −0 include/numeric-prelude-restricted.hs
@@ -1,4 +1,4 @@
-{-# LANGUAGE NoImplicitPrelude, NoMonomorphismRestriction, RankNTypes #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, NoMonomorphismRestriction, RankNTypes #-}
{-# OPTIONS -Wall #-}
{-# OPTIONS_HADDOCK hide #-}
-- | an extension of the standard Prelude for paraiso.
@@ -23,13 +23,10 @@ import Data.ListLike.Text ()
import qualified Data.ListLike.Base (ListLike)
import qualified Data.Text as Text
import Data.Traversable
-import NumericPrelude hiding
- (not, (&&), (||), Monad, Functor, (*>), (++),
- (>>=), (>>), return, fail, fmap, mapM, mapM_, sequence, sequence_,
- (=<<), foldl, foldl1, foldr, foldr1, and, or, any, all, sum, product,
- concat, concatMap, maximum, minimum, elem, notElem)
import qualified NumericPrelude as Prelude
+#include "numeric-prelude-restricted.hs"
+
-- | An efficient String that is used thoroughout Paraiso modules.
type Text = Text.Text
View
@@ -87,6 +87,9 @@ Build-type: Simple
-- Constraint on the version of Cabal needed to build this package.
Cabal-version: >=1.10
+extra-source-files:
+ include/restricted-numeric-prelude.hs
+
flag test
description: Build the executable to run unit tests
@@ -157,7 +160,7 @@ Library
-- Extra tools (e.g. alex, hsc2hs, ...) needed to build the source.
-- Build-tools:
-
+ include-dirs: include
ghc-options: -O3 -Wall -fspec-constr-count=25
@@ -192,7 +195,7 @@ test-suite runtests
HUnit,
QuickCheck >= 2 && < 3
main-is: runtests.hs
-
+ include-dirs: include
ghc-options: -Wall -O3 -fspec-constr-count=25
Default-Language: Haskell2010
@@ -0,0 +1,5 @@
+import NumericPrelude hiding
+ (not, (&&), (||), Monad, Functor, (*>), (++),
+ (>>=), (>>), return, fail, fmap, mapM, mapM_, sequence, sequence_,
+ (=<<), foldl, foldl1, foldr, foldr1, and, or, any, all, sum, product,
+ concat, concatMap, maximum, minimum, elem, notElem)

0 comments on commit 728a52f

Please sign in to comment.