[Git][ghc/ghc][wip/js-staging] Expect IOPort test to be broken

[Sylvain Henry (@hsyl20)]

Sylvain Henry pushed to branch wip/js-staging at Glasgow Haskell Compiler / GHC


Commits:
fc02ebca by Sylvain Henry at 2022-10-06T14:47:47+02:00
Expect IOPort test to be broken

- - - - -


2 changed files:

- testsuite/driver/testlib.py
- testsuite/tests/primops/should_run/all.T


Changes:

=====================================
testsuite/driver/testlib.py
=====================================
@@ -142,6 +142,13 @@ def js_skip( name, opts ):
     if arch("js"):
         skip(name,opts)
 
+# expect broken for the JS backend
+def js_broken( bug: IssueNumber ):
+    if arch("js"):
+        return expect_broken(bug);
+    else:
+        return normal;
+
 def expect_fail( name, opts ):
     # The compiler, testdriver, OS or platform is missing a certain
     # feature, and we don't plan to or can't fix it now or in the


=====================================
testsuite/tests/primops/should_run/all.T
=====================================
@@ -45,7 +45,7 @@ test('LevPolyPtrEquality2', normal, compile_and_run, [''])
 test('UnliftedArray1', normal, compile_and_run, [''])
 test('UnliftedArray2', normal, compile_and_run, [''])
 test('UnliftedArrayCAS', normal, compile_and_run, [''])
-test('UnliftedIOPort', normal, compile_and_run, [''])
+test('UnliftedIOPort', js_broken(22261), compile_and_run, [''])
 test('UnliftedMutVar1', normal, compile_and_run, [''])
 test('UnliftedMutVar2', normal, compile_and_run, [''])
 test('UnliftedMutVar3', normal, compile_and_run, [''])



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/fc02ebca2e953d4c61817577628d8c5414df0d72

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/fc02ebca2e953d4c61817577628d8c5414df0d72
You're receiving this email because of your account on gitlab.haskell.org.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20221006/6cd44f93/attachment-0001.html>