Skip to content
Permalink
Browse files

remove example as it's too complicated right now

  • Loading branch information...
shmish111 committed Aug 13, 2019
1 parent b28adf9 commit 61a08e12738e35d260771394157317059d0f9ba3
@@ -27,6 +27,3 @@ crowdfunding = strip $ T.decodeUtf8 $(makeRelativeToProject "usecases/CrowdFundi

starter :: T.Text
starter = strip $ T.decodeUtf8 $(makeRelativeToProject "usecases/Starter.hs" >>= embedFile)

auctionEnglish :: T.Text
auctionEnglish = strip $ T.decodeUtf8 $(makeRelativeToProject "usecases/Auction/English.hs" >>= embedFile)
@@ -26,7 +26,7 @@ import Playground.API (CompilationResult (CompilationRes
functionName, simulatorWalletBalance, simulatorWalletWallet)
import qualified Playground.Interpreter as PI
import Playground.Interpreter.Util (TraceResult)
import Playground.Usecases (auctionEnglish, crowdfunding, game, messages, vesting)
import Playground.Usecases (crowdfunding, game, messages, vesting)
import Schema (FormSchema (FormSchemaInt, FormSchemaObject, FormSchemaValue))
import Test.Hspec (Spec, describe, it, shouldBe, shouldSatisfy)
import Wallet.Emulator.Types (Wallet (Wallet))
@@ -38,7 +38,6 @@ spec = do
messagesSpec
crowdfundingSpec
knownCurrencySpec
auctionEnglishSpec

maxInterpretationTime :: Microsecond
maxInterpretationTime = fromMicroseconds 100000000
@@ -235,9 +234,6 @@ hasFundsDistribution requiredDistribution (Right (InterpreterResult _ (_, _, act
messagesSpec :: Spec
messagesSpec = describe "messages" $ compilationChecks messages

auctionEnglishSpec :: Spec
auctionEnglishSpec = describe "Auction.English" $ compilationChecks auctionEnglish

crowdfundingSpec :: Spec
crowdfundingSpec =
describe "crowdfunding" $ do

0 comments on commit 61a08e1

Please sign in to comment.
You can’t perform that action at this time.