[Git][ghc/ghc][wip/javascript-backend] 2 commits: Fix hlint
Sylvain Henry (@hsyl20)
gitlab at gitlab.haskell.org
Tue Nov 15 09:24:01 UTC 2022
Sylvain Henry pushed to branch wip/javascript-backend at Glasgow Haskell Compiler / GHC
Commits:
b26ec09b by Sylvain Henry at 2022-11-15T10:25:07+01:00
Fix hlint
- - - - -
fb6b71d1 by Sylvain Henry at 2022-11-15T10:27:45+01:00
Update ci
- - - - -
3 changed files:
- .gitlab/jobs.yaml
- compiler/GHC/StgToJS/Monad.hs
- compiler/GHC/StgToJS/Stack.hs
Changes:
=====================================
.gitlab/jobs.yaml
=====================================
@@ -1328,7 +1328,7 @@
"XZ_OPT": "-9"
}
},
- "nightly-x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-release": {
+ "nightly-x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-validate": {
"after_script": [
".gitlab/ci.sh save_cache",
".gitlab/ci.sh clean",
@@ -1338,7 +1338,7 @@
"artifacts": {
"expire_in": "8 weeks",
"paths": [
- "ghc-x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-release.tar.xz",
+ "ghc-x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-validate.tar.xz",
"junit.xml"
],
"reports": {
@@ -1380,12 +1380,12 @@
],
"variables": {
"BIGNUM_BACKEND": "native",
- "BIN_DIST_NAME": "ghc-x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-release",
- "BUILD_FLAVOUR": "release",
+ "BIN_DIST_NAME": "ghc-x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-validate",
+ "BUILD_FLAVOUR": "validate",
"CONFIGURE_ARGS": "--with-intree-gmp",
"CONFIGURE_WRAPPER": "emconfigure",
"CROSS_TARGET": "js-unknown-ghcjs",
- "TEST_ENV": "x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-release",
+ "TEST_ENV": "x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-validate",
"XZ_OPT": "-9"
}
},
@@ -3871,7 +3871,7 @@
"TEST_ENV": "x86_64-linux-deb11-cross_aarch64-linux-gnu-validate"
}
},
- "x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-release": {
+ "x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-validate": {
"after_script": [
".gitlab/ci.sh save_cache",
".gitlab/ci.sh clean",
@@ -3881,7 +3881,7 @@
"artifacts": {
"expire_in": "2 weeks",
"paths": [
- "ghc-x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-release.tar.xz",
+ "ghc-x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-validate.tar.xz",
"junit.xml"
],
"reports": {
@@ -3923,12 +3923,12 @@
],
"variables": {
"BIGNUM_BACKEND": "native",
- "BIN_DIST_NAME": "ghc-x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-release",
- "BUILD_FLAVOUR": "release",
+ "BIN_DIST_NAME": "ghc-x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-validate",
+ "BUILD_FLAVOUR": "validate",
"CONFIGURE_ARGS": "--with-intree-gmp",
"CONFIGURE_WRAPPER": "emconfigure",
"CROSS_TARGET": "js-unknown-ghcjs",
- "TEST_ENV": "x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-release"
+ "TEST_ENV": "x86_64-linux-deb11-int_native-cross_js-unknown-ghcjs-validate"
}
},
"x86_64-linux-deb11-validate": {
=====================================
compiler/GHC/StgToJS/Monad.hs
=====================================
@@ -1,5 +1,4 @@
{-# LANGUAGE OverloadedStrings #-}
-{-# LANGUAGE TupleSections #-}
{-# LANGUAGE LambdaCase #-}
-- | JS codegen state monad
=====================================
compiler/GHC/StgToJS/Stack.hs
=====================================
@@ -220,7 +220,6 @@ pushN = listArray (1,32) $ map (TxtI . mkFastString . ("h$p"++) . show) [(1::Int
-- functions.
pushN' :: Array Int JExpr
pushN' = fmap (ValExpr . JVar) pushN
- where
-- | Partial Push functions. Like 'pushN' except these push functions skip
-- slots. For example,
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/compare/52f4ee8da6b65905e6e20be123997f06a8f80b85...fb6b71d1771df4e4ffd54a63ffaa0df2812a91ff
--
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/compare/52f4ee8da6b65905e6e20be123997f06a8f80b85...fb6b71d1771df4e4ffd54a63ffaa0df2812a91ff
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/20221115/fa7b6346/attachment-0001.html>
More information about the ghc-commits
mailing list