Add a clash wrapper that fills in the libdir from GHC.Paths

diff --git a/cλash-nolibdir/CLasH/Translator.hs b/cλash-nolibdir/CLasH/Translator.hs
new file mode 100644 (file)
index 0000000..77c1fe3
--- /dev/null
+++ b/cλash-nolibdir/CLasH/Translator.hs
@@ -0,0 +1,24 @@
+module CLasH.Translator where
+
+import qualified GHC.Paths
+import qualified "clash" CLasH.Translator as Original (makeVHDL, makeVHDLAnn, listBindings, listBind)
+
+makeVHDL :: String -> String -> Bool -> IO ()
+makeVHDL filename name stateful = do
+  let libdir = GHC.Paths.libdir
+  Original.makeVHDL libdir filename name stateful
+  
+makeVHDLAnn :: String -> IO ()
+makeVHDLAnn filename = do
+  let libdir = GHC.Paths.libdir
+  Original.makeVHDLAnn libdir filename
+
+listBindings :: String -> IO [()]
+listBindings filename = do
+  let libdir = GHC.Paths.libdir
+  Original.listBindings libdir filename
+  
+listBind :: String -> String -> IO ()
+listBind filename name = do
+  let libdir = GHC.Paths.libdir
+  Original.listBind libdir filename name

diff --git a/cλash-nolibdir/LICENSE b/cλash-nolibdir/LICENSE
new file mode 100644 (file)
index 0000000..23ebcfd
--- /dev/null
+++ b/cλash-nolibdir/LICENSE
@@ -0,0 +1,25 @@
+Copyright (c) 2009 Christiaan Baaij & Matthijs Kooijman
+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 copyright holder 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 HOLDER ``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 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.
\ No newline at end of file

diff --git a/cλash-nolibdir/clash-nolibdir.cabal b/cλash-nolibdir/clash-nolibdir.cabal
new file mode 100644 (file)
index 0000000..a58db53
--- /dev/null
+++ b/cλash-nolibdir/clash-nolibdir.cabal
@@ -0,0 +1,23 @@
+name:               clash-nolibdir
+version:            0.1
+build-type:         Simple
+synopsis:           CAES Languege for Hardware Descriptions (CλasH)
+description:        CλasH is a toolchain/language to translate subsets of
+                    Haskell to synthesizable VHDL. It does this by translating
+                    the intermediate System Fc (GHC Core) representation to a
+                    VHDL AST, which is then written to file.
+category:           Development
+license:            BSD3
+license-file:       LICENSE
+package-url:        http://github.com/darchon/clash/tree/master
+copyright:          Copyright (c) 2009 Christiaan Baaij & Matthijs Kooijman
+author:             Christiaan Baaij & Matthijs Kooijman
+stability:          alpha
+maintainer:         christiaan.baaij@gmail.com & matthijs@stdin.nl
+Cabal-Version:      >= 1.2
+
+Library
+  build-depends:    base > 4, clash, ghc-paths
+  extensions:       PackageImports          
+  exposed-modules:  CLasH.Translator
+  
\ No newline at end of file