Add test

Author: wismill

cabal-testsuite/PackageTests/JS/JsSources/cabal.test.hs renamed to cabal-testsuite/PackageTests/JS/JsSources/js-arch.test.hs

@@ -6,7 +6,10 @@ build-type: Simple
 library
   default-language: Haskell2010
   js-sources: jsbits/lib.js
-  hs-source-dirs: src
+  if arch(JavaScript)
+    hs-source-dirs: srcJS
+  else
+    hs-source-dirs: src
   exposed-modules: Lib
   build-depends: base
 

cabal-testsuite/PackageTests/JS/JsSources/jssources.cabal

@@ -0,0 +1,12 @@
+# cabal v2-run
+Resolving dependencies...
+Build profile: -w ghc-<GHCVER> -O1
+In order, the following will be built:
+ - jssources-0 (lib) (first run)
+ - jssources-0 (exe:demo) (first run)
+Configuring library for jssources-0..
+Preprocessing library for jssources-0..
+Building library for jssources-0..
+Configuring executable 'demo' for jssources-0..
+Preprocessing executable 'demo' for jssources-0..
+Building executable 'demo' for jssources-0..

cabal-testsuite/PackageTests/JS/JsSources/other-arch.out

@@ -0,0 +1,7 @@
+import Test.Cabal.Prelude
+
+main = cabalTest $ do
+    skipIfJavaScript
+    -- Ensure the field `js-sources` does not raise issues
+    res <- cabal' "v2-run" ["demo"]
+    assertOutputContains "Hello Not JS!" res

cabal-testsuite/PackageTests/JS/JsSources/other-arch.test.hs

@@ -1,3 +1,4 @@
 module Lib where
 
-foreign import javascript foo :: IO ()
+foo :: IO ()
+foo = putStrLn "Hello Not JS!"

cabal-testsuite/PackageTests/JS/JsSources/src/Lib.hs

@@ -0,0 +1,3 @@
+module Lib where
+
+foreign import javascript foo :: IO ()