Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Cleaned up code a little bit.

  • Loading branch information...
commit 1621a42f287cc27635f5073211f6b37b9a606a61 1 parent 1e16577
Will Donnelly authored
Showing with 47 additions and 17 deletions.
  1. +10 −16 Dyre.hs
  2. +28 −0 LICENSE
  3. +9 −1 dyre.cabal
26 Dyre.hs
View
@@ -1,19 +1,13 @@
-module Dyre
- ( Params (..)
- , runWith
- ) where
+module Dyre ( runWith, Params(..) ) where
-import System ( getArgs )
-import System.IO ( hPutStrLn, stderr, hClose, openFile, IOMode(..) )
-import System.Info ( compilerName, os, arch )
-import System.Time ( ClockTime )
-import System.Exit ( ExitCode(..) )
-import System.Process ( runProcess, waitForProcess )
-import System.FilePath ( (</>) )
-import System.Directory ( getModificationTime, doesFileExist, removeFile
- , createDirectoryIfMissing, getCurrentDirectory )
-import Control.Exception ( bracket )
-import qualified GHC.Paths ( ghc )
+import System ( getArgs )
+import System.IO ( openFile, IOMode(..), hClose )
+import System.Info ( os, arch )
+import System.Time ( ClockTime )
+import System.FilePath ( (</>) )
+import Control.Exception ( bracket )
+import System.Directory ( getModificationTime, doesFileExist,
+ getCurrentDirectory )
import Dyre.Params ( Params(..) )
import Dyre.Compile ( customCompile )
@@ -64,7 +58,7 @@ wrapMain orig params@Params{realMain = realMain, projectName = pName} cfg = do
-- If there's a custom binary and we're not it, run it. Otherwise
-- just launch the main function.
customExists <- doesFileExist tmpFile
- if (customExists && orig)
+ if customExists && orig
then customExec params tmpFile
else launchMain params errors cfg
28 LICENSE
View
@@ -0,0 +1,28 @@
+Copyright (c) 2009, Will Donnelly
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions
+are met:
+
+ * Redistributions of source code must retain the above copyright
+ notice, this list of conditions and the following disclaimer.
+
+ * Redistributions in binary form must reproduce the above copyright
+ notice, this list of conditions and the following disclaimer in the
+ documentation and/or other materials provided with the distribution.
+
+ * Neither the name of the software nor the names of its contributors
+ may be used to endorse or promote products derived from this software
+ without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
+ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
+INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
+BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
+OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
+OF THE POSSIBILITY OF SUCH DAMAGE.
10 dyre.cabal
View
@@ -1,14 +1,22 @@
Name: dyre
Version: 0.1
-Category: Example
+Category: Development
Synopsis: Dynamic reconfiguration in Haskell
+Description: Dyre implements dynamic reconfiguration facilities after the
+ style of Xmonad. Unlike Yi's HConf, Dyre doesn't bother to
+ implement support for restarting and persisting state. Instead,
+ Dyre narrows its focus down to the task of compiling and running
+ custom binaries based on user configurations.
+
Homepage: http://github.com/willdonnelly/dyre
Bug-Reports: http://github.com/willdonnelly/dyre/issues
Stability: alpha
Author: Will Donnelly
Maintainer: Will Donnelly <will.donnelly@gmail.com>
Copyright: (c) 2009 Will Donnelly
+License: BSD3
+License-File: LICENSE
Build-Type: Simple
Cabal-Version: >= 1.2
Please sign in to comment.
Something went wrong with that request. Please try again.