diff --git a/cabal.project b/cabal.project index a577833b994..bdd14f71369 100644 --- a/cabal.project +++ b/cabal.project @@ -26,7 +26,7 @@ packages: ./typed-protocols ./strict-stm ./ntp-client ./cardano-client - + ./ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser constraints: ip < 1.5 , hedgehog >= 1.0 diff --git a/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/GenesisUTxO.hs b/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/TxIn/GenesisUTxO.hs similarity index 99% rename from ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/GenesisUTxO.hs rename to ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/TxIn/GenesisUTxO.hs index 3c903c42ba4..65252a33185 100644 --- a/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/GenesisUTxO.hs +++ b/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/TxIn/GenesisUTxO.hs @@ -1,6 +1,6 @@ {-# LANGUAGE OverloadedStrings #-} -module GenesisUTxO (genesisUTxO) where +module TxIn.GenesisUTxO (genesisUTxO) where import Data.ByteString (ByteString) import qualified Data.ByteString as BS @@ -9,7 +9,7 @@ import qualified Data.ByteString.Short as Short import Data.Set (Set) import qualified Data.Set as Set -import Types (TxIn (..)) +import TxIn.Types (TxIn (..)) {------------------------------------------------------------------------------- Genesis UTxO diff --git a/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/Main.hs b/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/TxIn/Main.hs similarity index 99% rename from ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/Main.hs rename to ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/TxIn/Main.hs index 5c5f8403fd6..5413f4908f5 100644 --- a/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/Main.hs +++ b/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/TxIn/Main.hs @@ -3,7 +3,7 @@ {-# LANGUAGE NumericUnderscores #-} {-# LANGUAGE TypeFamilies #-} -module Main (main) where +module TxIn.Main (main) where import qualified Control.Monad as M import Data.Bits (shiftL) @@ -26,8 +26,8 @@ import qualified Data.Vector as V import GHC.Clock (getMonotonicTimeNSec) import qualified Options.Applicative as O -import Types -import GenesisUTxO +import TxIn.Types +import TxIn.GenesisUTxO main :: IO () main = do diff --git a/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/Types.hs b/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/TxIn/Types.hs similarity index 95% rename from ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/Types.hs rename to ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/TxIn/Types.hs index 4bf3261f1e1..bc73b6cf805 100644 --- a/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/Types.hs +++ b/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/TxIn/Types.hs @@ -1,4 +1,4 @@ -module Types ( +module TxIn.Types ( TxIn (..) , TxOutputIds (..) , outputTxIns diff --git a/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/app/txin.hs b/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/app/txin.hs new file mode 100644 index 00000000000..60d6e0bc490 --- /dev/null +++ b/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/app/txin.hs @@ -0,0 +1,4 @@ +{-# language NoImplicitPrelude #-} +module Main(main) where + +import TxIn.Main (main) diff --git a/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/txin-delta-timeline-analyser.cabal b/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/txin-delta-timeline-analyser.cabal new file mode 100644 index 00000000000..07d0a393ce4 --- /dev/null +++ b/ouroboros-consensus-cardano/tools/txin-delta-timeline-analyser/txin-delta-timeline-analyser.cabal @@ -0,0 +1,32 @@ +cabal-version: >= 1.8 +name: txin-delta-timeline-analyser +version: 0.2.0.0 +synopsis: X +-- description: +license: Apache-2.0 +copyright: 2021 Input Output (Hong Kong) Ltd. +author: X +maintainer: +build-type: Simple + + +library + hs-source-dirs: . + default-language: Haskell2010 + exposed-modules: TxIn.Main + TxIn.Types + TxIn.GenesisUTxO + build-depends: base, + bytestring, + containers, + optparse-applicative, + vector, + text, + text-short, + base64, + base16 + +executable txin + hs-source-dirs: app + main-is: txin.hs + build-depends: txin-delta-timeline-analyser