From 8a1aacd925365a7a2b5329168af93731f81de35d Mon Sep 17 00:00:00 2001 From: Ivan Raikov Date: Sun, 19 Feb 2023 08:37:52 -0800 Subject: [PATCH] using 2 processors for mpi tests --- .github/workflows/chicken-scheme-ci.yml | 4 ++-- tests/run.scm | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/.github/workflows/chicken-scheme-ci.yml b/.github/workflows/chicken-scheme-ci.yml index 65d41d0..160a145 100644 --- a/.github/workflows/chicken-scheme-ci.yml +++ b/.github/workflows/chicken-scheme-ci.yml @@ -12,7 +12,7 @@ jobs: runs-on: ubuntu-latest steps: - - uses: actions/checkout@v2 + - uses: actions/checkout@v3 - uses: iraikov/setup-scheme@master with: implementation: 'chicken' @@ -32,7 +32,7 @@ jobs: runs-on: macOS-latest steps: - - uses: actions/checkout@v2 + - uses: actions/checkout@v3 - uses: iraikov/setup-scheme@master with: implementation: 'chicken' diff --git a/tests/run.scm b/tests/run.scm index f6829d9..e92da8f 100644 --- a/tests/run.scm +++ b/tests/run.scm @@ -24,9 +24,9 @@ (define mpirun (or (get-environment-variable "MPIRUN") "mpirun")) (define csi (or (get-environment-variable "CHICKEN_CSI") "csi")) -(if (not (and (zero? (system (conc mpirun " -np 8 " csi " -s " +(if (not (and (zero? (system (conc mpirun " -np 2 " csi " -s " (make-pathname prefix "datatest.scm")))) - (zero? (system (conc mpirun " -np 8 " csi " -s " + (zero? (system (conc mpirun " -np 2 " csi " -s " (make-pathname prefix "mpitest.scm")))) ))