Sha256: 641a305a283de0295564be65e51346d748f7c49359e5e081cf0f22d708ed6a6e

Contents?: true

Size: 1.95 KB

Versions: 141

Compression:

Stored size: 1.95 KB

Contents

module Test.Main where

import Prelude
import Control.Monad.Eff (Eff)
import Control.Monad.Eff.AVar (AVAR)
import Control.Monad.Eff.Console (CONSOLE)
import Test.Unit.Assert as Assert
import Test.Unit (TestSuite, suite, test)
import Test.Unit.Console (TESTOUTPUT)
import Test.Unit.Main (runTest)
import BracketPush (isPaired)

main :: forall eff
  . Eff ( avar :: AVAR
        , console :: CONSOLE
        , testOutput :: TESTOUTPUT
        | eff                     
        )
        Unit
main = runTest suites

suites :: forall e. TestSuite e
suites = do
  suite "BracketPush.isPaired" do

    test "paired square brackets" $
      Assert.equal true
                   (isPaired "[]")

    test "empty string" $
      Assert.equal true
                   (isPaired "")

    test "unpaired brackets" $
      Assert.equal false
                   (isPaired "[[")

    test "wrong ordered brackets" $
      Assert.equal false
                   (isPaired "}{")

    test "paired with whitespace" $
      Assert.equal true
                   (isPaired "{ }")

    test "simple nested brackets" $
      Assert.equal true
                   (isPaired "{[]}")

    test "several paired brackets" $
      Assert.equal true
                   (isPaired "{}[]")

    test "paired and nested brackets" $
      Assert.equal true
                   (isPaired "([{}({}[])])")

    test "unopened closing brackets" $
      Assert.equal false
                   (isPaired "{[)][]}")

    test "unpaired and nested brackets" $
      Assert.equal false
                   (isPaired "([{])")

    test "paired and wrong nested brackets" $
      Assert.equal false
                   (isPaired "[({]})")

    test "math expression" $
      Assert.equal true
                   (isPaired "(((185 + 223.85) * 15) - 543)/2")

    test "complex latex expression" $
      Assert.equal true
                   (isPaired "\\left(\\begin{array}{cc} \\frac{1}{3} & x\\\\ \\mathrm{e}^{x} &... x^2 \\end{array}\\right)")

Version data entries

141 entries across 141 versions & 1 rubygems

Version Path
trackler-2.2.1.180 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.179 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.178 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.177 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.176 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.175 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.174 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.173 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.172 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.171 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.170 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.169 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.167 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.166 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.165 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.164 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.163 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.162 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.161 tracks/purescript/exercises/bracket-push/test/Main.purs
trackler-2.2.1.160 tracks/purescript/exercises/bracket-push/test/Main.purs