language-js-0.3.0: t/Test/Imports.hs

module Test.Imports where

import Test.Hspec
import Test.Helpers

testImports = do
  shouldBe (testTopLevelStatement "import \"test.js\"")
    "Right (SImportFile (LS \"test.js\"))"

  shouldBe (testTopLevelStatement "import * as A from \"test.js\"")
    "Right (SImport (Left (Namespace (LI \"A\"))) (LS \"test.js\"))"

  shouldBe (testTopLevelStatement "import {x} from \"test.js\"")
    "Right (SImport (Right [BindNames [LI \"x\"]]) (LS \"test.js\"))"

  shouldBe (testTopLevelStatement "import B, {x} from \"test.js\"")
    "Right (SImport (Right [DefaultName (LI \"B\"),BindNames [LI \"x\"]]) (LS \"test.js\"))"