DrIFT 2.4.1 → 2.4.2
raw patch · 5 files changed
+30/−28 lines, 5 filesdep +filepath
Dependencies added: filepath
Files
- DrIFT.cabal +4/−4
- README.md +2/−2
- docs/drift.info +20/−19
- drift-ghc.hs +3/−2
- src/DrIFT/Version.hs +1/−1
DrIFT.cabal view
@@ -1,8 +1,8 @@ name: DrIFT-version: 2.4.1+version: 2.4.2 synopsis: Program to derive type class instances-description: Today Data.Derive <http://hackage.haskell.org/package/derive> is good another solution for DrFIT.- See the User Manual <http://community.haskell.org/~ndm/darcs/derive/derive.htm>.+description: Data.Derive <http://hackage.haskell.org/package/derive> is good another solution for DrFIT.+ But DrFIT is Haskell 98 compliant, derive is not. . DrIFT is a type sensitive preprocessor for Haskell. It extracts type declarations and directives from modules. The directives cause rules to be fired on the parsed@@ -56,6 +56,6 @@ ghc-options: -Wall -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-matches -fno-warn-unused-do-bind -fno-warn-missing-signatures executable drift-ghc- build-depends: base >= 4.0 && < 5, process+ build-depends: base >= 4.0 && < 5, process, filepath main-is: drift-ghc.hs ghc-options: -Wall -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-matches -fno-warn-unused-do-bind -fno-warn-missing-signatures
README.md view
@@ -1,11 +1,11 @@-# DrIFT-cabalized [](https://travis-ci.org/ajhc/drift)+# DrIFT [](https://travis-ci.org/ajhc/drift) This package contains a source distribution of DrIFT, a tool for automatic derivation of Haskell class instances. DrIFT was formerly known as Derive. The original homepage is at [http://repetae.net/john/computer/haskell/DrIFT/](http://repetae.net/john/computer/haskell/DrIFT/).-But DrIFT-cabalized package has some changes with original DrIFT.+But this DrIFT package has some changes with original DrIFT. ## Contents of this package:
docs/drift.info view
@@ -1,4 +1,4 @@-This is drift.info, produced by makeinfo version 5.1 from drift.texi.+This is drift.info, produced by makeinfo version 5.2 from drift.texi. INFO-DIR-SECTION Haskell Tools START-INFO-DIR-ENTRY@@ -338,6 +338,7 @@ rnf (Bar) = () rnf (Bub) = () + File: drift.info, Node: User Guide, Next: Standard Rules, Prev: Introduction, Up: Top @@ -813,23 +814,23 @@ Node: An Example6306 Node: Source Code6863 Node: After processing with DrIFT7684-Node: User Guide12785-Node: Command Line13808-Node: Command Syntax14414-Node: Emacs DrIFT mode16807-Node: Standard Rules17624-Node: User-Defined Rules20811-Node: The Basic Idea21938-Node: How is a Type Represented?22503-Node: Pretty Printing25401-Node: Utilities26185-Node: Adding a new rule26626-Node: Installation27087-Node: GHC27544-Node: Hugs27896-Node: Runhugs28157-Node: Environment Variables28487-Node: Installing the Emacs DrIFT Mode29129-Node: Bugs29561+Node: User Guide12786+Node: Command Line13809+Node: Command Syntax14415+Node: Emacs DrIFT mode16808+Node: Standard Rules17625+Node: User-Defined Rules20812+Node: The Basic Idea21939+Node: How is a Type Represented?22504+Node: Pretty Printing25402+Node: Utilities26186+Node: Adding a new rule26627+Node: Installation27088+Node: GHC27545+Node: Hugs27897+Node: Runhugs28158+Node: Environment Variables28488+Node: Installing the Emacs DrIFT Mode29130+Node: Bugs29562 End Tag Table
drift-ghc.hs view
@@ -2,6 +2,7 @@ import System.Cmd (rawSystem) import System.Environment (getArgs) import System.Exit (ExitCode(ExitSuccess))+import System.FilePath import Paths_DrIFT (getBinDir) main :: IO ExitCode@@ -14,9 +15,9 @@ conditional :: FilePath -> FilePath -> FilePath -> IO ExitCode conditional orgnl inf outf = do prefix <- getBinDir infile <- readFile inf- if "{-!" `isInfixOf` infile then do putStrLn (prefix ++ "DriFT-cabalized " +++ if "{-!" `isInfixOf` infile then do putStrLn (prefix </> "DrIFT " ++ inf ++ " -o " ++ outf)- rawSystem inf ["-o", outf]+ rawSystem (prefix </> "DrIFT") [inf, "-o", outf] else do writeFile outf ("{-# LINE 1 \"" ++ orgnl ++ " #-}") readFile inf >>= appendFile outf return ExitSuccess
src/DrIFT/Version.hs view
@@ -4,7 +4,7 @@ package = "DrIFT" version :: String-version = "2.4.1"+version = "2.4.2" fullName :: String fullName = package ++ "-" ++ version