tmp: remove plutustx

Author: bogdan-manole

cabal.project

@@ -22,7 +22,7 @@ index-state:
 packages:
     .
 
-source-repository-package
-  type: git
-  location: https://github.com/bogdan-manole/extensions
-  tag: 439a3333d616a67783e2e22cf364ead9b18062ac
+-- source-repository-package
+--   type: git
+--   location: https://github.com/bogdan-manole/extensions
+--   tag: 439a3333d616a67783e2e22cf364ead9b18062ac

stan.cabal

@@ -193,8 +193,8 @@ library target
                      , scientific
                      , text
                      , unordered-containers
-                     , plutus-tx ^>=1.54
-                     , plutus-ledger-api ^>=1.54
+                     -- , plutus-tx ^>=1.54
+                     -- , plutus-ledger-api ^>=1.54
 
   exposed-modules:     Target.AntiPattern
                          Target.AntiPattern.Stan0206

target/Target/PlutusTx.hs

@@ -9,15 +9,16 @@ import qualified Data.HashSet as HS
 import qualified Data.List as List
 import qualified Data.Text as Text
 
-import qualified PlutusTx as Tx
-import qualified PlutusTx.Maybe as Maybe
-import qualified PlutusTx.Prelude as Tx
-import qualified PlutusTx.AssocMap as AssocMap
-import PlutusTx (UnsafeFromData(unsafeFromBuiltinData))
-
--- Place for future imports
-import PlutusLedgerApi.V1 (PubKeyHash(..),Credential(..),ScriptHash(..))
 {-# ANN module ("onchain-contract" :: String) #-}
+-- import qualified PlutusTx as Tx
+-- import qualified PlutusTx.Maybe as Maybe
+-- import qualified PlutusTx.Prelude as Tx
+-- import qualified PlutusTx.AssocMap as AssocMap
+-- import PlutusTx (UnsafeFromData(unsafeFromBuiltinData))
+-- 
+-- -- Place for future imports
+-- import PlutusLedgerApi.V1 (PubKeyHash(..),Credential(..),ScriptHash(..))
+--
 --
 --
 --
@@ -29,38 +30,38 @@ import PlutusLedgerApi.V1 (PubKeyHash(..),Credential(..),ScriptHash(..))
 --
 --
 
-assocMap :: AssocMap.Map k v
-assocMap = AssocMap.unsafeFromList mempty
-
-unsafeFromBuiltinData :: Integer
-unsafeFromBuiltinData =
-  Tx.unsafeFromBuiltinData (error "we don't care")
-
-usageOfPTxMaybe :: Integer
-usageOfPTxMaybe = let
-  x = Maybe.fromMaybe 0 (Maybe.Just 1)
-  in x
-
-pubKeyHashEq :: Bool
-pubKeyHashEq = pubKeyHash == pubKeyHash
-  where
-    pubKeyHash :: PubKeyHash
-    pubKeyHash = error "we don't care"
-
-scriptHashEq :: Bool
-scriptHashEq = scriptHash == scriptHash
-  where
-    scriptHash :: ScriptHash
-    scriptHash = error "we don't care"
-
-credentialHashEq :: Bool
-credentialHashEq = credentialHash == credentialHash
-  where
-    credentialHash :: Credential
-    credentialHash = error "we don't care"
-
-credentialHashLe :: Bool
-credentialHashLe = credentialHash < credentialHash
-  where
-    credentialHash :: Credential
-    credentialHash = error "we don't care"
+-- assocMap :: AssocMap.Map k v
+-- assocMap = AssocMap.unsafeFromList mempty
+-- 
+-- unsafeFromBuiltinData :: Integer
+-- unsafeFromBuiltinData =
+--   Tx.unsafeFromBuiltinData (error "we don't care")
+-- 
+-- usageOfPTxMaybe :: Integer
+-- usageOfPTxMaybe = let
+--   x = Maybe.fromMaybe 0 (Maybe.Just 1)
+--   in x
+-- 
+-- pubKeyHashEq :: Bool
+-- pubKeyHashEq = pubKeyHash == pubKeyHash
+--   where
+--     pubKeyHash :: PubKeyHash
+--     pubKeyHash = error "we don't care"
+-- 
+-- scriptHashEq :: Bool
+-- scriptHashEq = scriptHash == scriptHash
+--   where
+--     scriptHash :: ScriptHash
+--     scriptHash = error "we don't care"
+-- 
+-- credentialHashEq :: Bool
+-- credentialHashEq = credentialHash == credentialHash
+--   where
+--     credentialHash :: Credential
+--     credentialHash = error "we don't care"
+-- 
+-- credentialHashLe :: Bool
+-- credentialHashLe = credentialHash < credentialHash
+--   where
+--     credentialHash :: Credential
+--     credentialHash = error "we don't care"