- cmucl-cvs - mailman3.common-lisp.net

[Git][cmucl/cmucl][master] 3 commits: Fix #41: Report proper process status
by Raymond Toy 16 Sep '17

16 Sep '17

Raymond Toy pushed to branch master at cmucl / cmucl Commits: f05cb10a by Raymond Toy at 2017-09-08T20:38:41-07:00 Fix #41: Report proper process status The main problem is that we weren't calling wait3 with WCONTINUED so that we would be signaled when the process continues. And we also need to check that result of wait call was WCONTINUED> Replace the wait3 routine with a C routine (prog_status) so we don't have to deal with the OS-specific flags. This function basically returns what the lisp function wait3 did. Use this function in GET-PROCESSES-STATUS-CHANGES. - runprog.c: - Add prog_status - run-program.lisp: - Use prog_status instead of wait3 - issues.lisp: - Add basic test - - - - - 65ce358d by Raymond Toy at 2017-09-15T22:50:47-07:00 Fix up minor issues in implementation - process-alive-p should return T for continued processes - Simplify prog-status slightly by making the status code array start :signaled instead of nil. - Update prog_status with enum to specify the codes to make it clearer what they mean and to make it clearer that it matches the expectations in prog-status. - - - - - 99ebe80c by Raymond Toy at 2017-09-16T21:02:40+00:00 Merge branch 'rtoy-fix-issue-41' into 'master' Fix #41: Report proper process status Closes #41 See merge request !23 - - - - - 3 changed files: - src/code/run-program.lisp - src/lisp/runprog.c - tests/issues.lisp Changes: ===================================== src/code/run-program.lisp ===================================== --- a/src/code/run-program.lisp +++ b/src/code/run-program.lisp @@ -34,6 +34,12 @@ (options c-call:int) (rusage c-call:int)) +(alien:def-alien-routine ("prog_status" c-prog-status) c-call:void + (pid c-call:int :out) + (what c-call:int :out) + (code c-call:int :out) + (corep c-call:int :out)) + (eval-when (load eval compile) (defconstant wait-wnohang #-svr4 1 #+svr4 #o100) (defconstant wait-wuntraced #-svr4 2 #+svr4 4) @@ -73,6 +79,16 @@ signal (not (zerop (ldb (byte 1 7) status))))))))) +(defun prog-status () + (multiple-value-bind (ret pid what code corep) + (c-prog-status) + (declare (ignore ret)) + (when (plusp pid) + (values pid + (aref #(:signaled :stopped :continued :exited) what) + code + (not (zerop corep)))))) + ;;;; Process control stuff. @@ -201,7 +217,8 @@ (declare (type process proc)) (let ((status (process-status proc))) (if (or (eq status :running) - (eq status :stopped)) + (eq status :stopped) + (eq status :continued)) t nil))) @@ -235,7 +252,7 @@ (defun get-processes-status-changes () (loop (multiple-value-bind (pid what code core) - (wait3 t t) + (prog-status) (unless pid (return)) (let ((proc (find pid *active-processes* :key #'process-pid))) ===================================== src/lisp/runprog.c ===================================== --- a/src/lisp/runprog.c +++ b/src/lisp/runprog.c @@ -3,6 +3,8 @@ * */ +#include <stdio.h> + #include <sys/ioctl.h> #include <errno.h> #include <fcntl.h> @@ -10,6 +12,7 @@ #include <stdlib.h> #include <termios.h> #include <unistd.h> +#include <sys/wait.h> pid_t spawn(char *program, char *argv[], char *envp[], char *pty_name, @@ -70,3 +73,64 @@ spawn(char *program, char *argv[], char *envp[], char *pty_name, /* The exec didn't work, flame out. */ exit(1); } + +/* + * Call waitpid and return appropriate information about what happened. + * + * what - int taking the values: + * 0 - ok + * 1 - signaled + * 2 - stopped + * 3 - continued + * 4 - exited + * code - the terminating signal + * core - true (non-zero) if a core was produced + */ + +/* + * Status codes. Must be in the same order as in ext::prog-status in + * run-program.lisp + */ +enum status_code { + SIGNALED, + STOPPED, + CONTINUED, + EXITED +}; + +void +prog_status(pid_t* pid, int* what, int* code, int* corep) +{ + pid_t w; + int status; + + w = waitpid(-1, &status, WNOHANG | WUNTRACED | WCONTINUED); + *pid = w; + + if (w == -1) { + + return; + } + + if (WIFEXITED(status)) { + *what = EXITED; + *code = WEXITSTATUS(status); + *corep = 0; + } else if (WIFSIGNALED(status)) { + *what = SIGNALED; + *code = WTERMSIG(status); + *corep = WCOREDUMP(status); + } else if (WIFSTOPPED(status)) { + *what = STOPPED; + *code = WSTOPSIG(status); + *corep = 0; + } else if (WIFCONTINUED(status)) { + *what = CONTINUED; + *code = 0; + *corep = 0; + } else { + fprintf(stderr, "pid = %d, status = 0x%x\n", *pid, status); + } + + return; +} ===================================== tests/issues.lisp ===================================== --- a/tests/issues.lisp +++ b/tests/issues.lisp @@ -367,3 +367,41 @@ ;; get-universal-time only has an accuracy of 1 sec, just verify ;; more than 3 sec have elapsed. (assert-true (>= (- (get-universal-time) start-time) 3))))) + +(defun issue-41-tester (stop-signal) + (let* ((p (ext:run-program "/bin/sleep" '("5") :wait nil)) + (pid (ext:process-pid p))) + (flet ((external-kill (pid signal) + (ext:run-program "/usr/bin/env" + (list "kill" + (format nil "-~D" signal) + (format nil "~D" pid))))) + (assert-eql :running (ext:process-status p)) + + (external-kill pid stop-signal) + (sleep 1) + (assert-eql :stopped (ext:process-status p)) + + (external-kill pid unix:sigcont) + (sleep 1) + (assert-eql :continued (ext:process-status p)) + + (external-kill pid stop-signal) + (sleep 1) + (assert-eql :stopped (ext:process-status p)) + + (external-kill pid unix:sigcont) + (sleep 1) + (assert-eql :continued (ext:process-status p)) + + (sleep 5) + (assert-eql :exited (ext:process-status p))))) + +(define-test issue.41.1 + (:tag :issues) + (issue-41-tester unix:sigstop)) + +#+nil +(define-test issue.41.2 + (:tag :issues) + (issue-41-tester unix:sigtstp)) View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/compare/4acd1d80b63cd3d639fe7291… --- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/compare/4acd1d80b63cd3d639fe7291… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][rtoy-fix-issue-41] Fix up minor issues in implementation
by Raymond Toy 16 Sep '17

16 Sep '17

Raymond Toy pushed to branch rtoy-fix-issue-41 at cmucl / cmucl Commits: 65ce358d by Raymond Toy at 2017-09-15T22:50:47-07:00 Fix up minor issues in implementation - process-alive-p should return T for continued processes - Simplify prog-status slightly by making the status code array start :signaled instead of nil. - Update prog_status with enum to specify the codes to make it clearer what they mean and to make it clearer that it matches the expectations in prog-status. - - - - - 2 changed files: - src/code/run-program.lisp - src/lisp/runprog.c Changes: ===================================== src/code/run-program.lisp ===================================== --- a/src/code/run-program.lisp +++ b/src/code/run-program.lisp @@ -85,7 +85,7 @@ (declare (ignore ret)) (when (plusp pid) (values pid - (aref #(nil :signaled :stopped :continued :exited) what) + (aref #(:signaled :stopped :continued :exited) what) code (not (zerop corep)))))) @@ -217,7 +217,8 @@ (declare (type process proc)) (let ((status (process-status proc))) (if (or (eq status :running) - (eq status :stopped)) + (eq status :stopped) + (eq status :continued)) t nil))) ===================================== src/lisp/runprog.c ===================================== --- a/src/lisp/runprog.c +++ b/src/lisp/runprog.c @@ -3,6 +3,8 @@ * */ +#include <stdio.h> + #include <sys/ioctl.h> #include <errno.h> #include <fcntl.h> @@ -85,6 +87,17 @@ spawn(char *program, char *argv[], char *envp[], char *pty_name, * core - true (non-zero) if a core was produced */ +/* + * Status codes. Must be in the same order as in ext::prog-status in + * run-program.lisp + */ +enum status_code { + SIGNALED, + STOPPED, + CONTINUED, + EXITED +}; + void prog_status(pid_t* pid, int* what, int* code, int* corep) { @@ -100,21 +113,23 @@ prog_status(pid_t* pid, int* what, int* code, int* corep) } if (WIFEXITED(status)) { - *what = 4; + *what = EXITED; *code = WEXITSTATUS(status); *corep = 0; } else if (WIFSIGNALED(status)) { - *what = 1; + *what = SIGNALED; *code = WTERMSIG(status); *corep = WCOREDUMP(status); } else if (WIFSTOPPED(status)) { - *what = 2; + *what = STOPPED; *code = WSTOPSIG(status); *corep = 0; } else if (WIFCONTINUED(status)) { - *what = 3; + *what = CONTINUED; *code = 0; *corep = 0; + } else { + fprintf(stderr, "pid = %d, status = 0x%x\n", *pid, status); } return; View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/65ce358d918559662672cb1ae… --- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/65ce358d918559662672cb1ae… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl] Pushed new branch rtoy-fix-issue-41
by Raymond Toy 09 Sep '17

09 Sep '17

Raymond Toy pushed new branch rtoy-fix-issue-41 at cmucl / cmucl --- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/tree/rtoy-fix-issue-41 You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][master] Point pipeline status to the master branch.
by Raymond Toy 06 Sep '17

06 Sep '17

Raymond Toy pushed to branch master at cmucl / cmucl Commits: 4acd1d80 by Raymond Toy at 2017-09-05T21:30:11-07:00 Point pipeline status to the master branch. Was pointing to the rtoy-gitlab-ci branch, but we want this to be the status of the master branch. - - - - - 1 changed file: - README.md Changes: ===================================== README.md ===================================== --- a/README.md +++ b/README.md @@ -1,4 +1,4 @@ -[![pipeline status](https://gitlab.common-lisp.net/cmucl/cmucl/badges/rtoy-gitlab-ci/pi… +[![pipeline status](https://gitlab.common-lisp.net/cmucl/cmucl/badges/master/pipeline.s… CMUCL is a free, high performance implementation of the Common Lisp programming language which runs on most major Unix platforms. It View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/4acd1d80b63cd3d639fe72918… --- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/4acd1d80b63cd3d639fe72918… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][master] 26 commits: Initial version.
by Raymond Toy 06 Sep '17

06 Sep '17

Raymond Toy pushed to branch master at cmucl / cmucl Commits: 6eca756b by Raymond Toy at 2016-10-06T19:24:46-07:00 Initial version. - - - - - 45a6d985 by Raymond Toy at 2016-10-06T20:05:12-07:00 Download cmucl binaries. - - - - - 7383a39c by Raymond Toy at 2016-10-06T20:07:13-07:00 Use correct syntax - - - - - 8296f92f by Raymond Toy at 2016-10-06T20:08:24-07:00 Add test job - - - - - 9c2dccfb by Raymond Toy at 2017-08-31T19:52:00-07:00 Merge branch 'master' into rtoy-gitlab-ci - - - - - cd429e9f by Raymond Toy at 2017-09-02T13:15:29-07:00 Use wget instead of curl - - - - - 0a87366f by Raymond Toy at 2017-09-02T13:25:43-07:00 Install wget - - - - - 5c92a00f by Raymond Toy at 2017-09-02T13:28:51-07:00 Install bzip2 so we can untar the cmucl tarballs - - - - - 92f8697e by Raymond Toy at 2017-09-02T13:33:56-07:00 More setup for building cmucl - untar the snapshot into the snapshot directory - git clone the cmucl repo - - - - - bcd2a53b by Raymond Toy at 2017-09-02T13:35:52-07:00 Use the correct paths when untarring. - - - - - 760d9c6d by Raymond Toy at 2017-09-02T13:38:01-07:00 Need to install git. While we're at it install make, gcc, and gcc 32-bit. - - - - - 373aaa60 by Raymond Toy at 2017-09-02T13:43:43-07:00 Build cmucl and run tests Update snapshot to 2017-04 snapshot too. - - - - - 3f6fd3df by Raymond Toy at 2017-09-02T13:47:20-07:00 Oops. Use correct tarball names - - - - - 119a7980 by Raymond Toy at 2017-09-02T13:53:35-07:00 Add some debugging stuff. - Print out the SHELL - Set prompt to include PWD - Where is `time` and why can't the shell find it? - - - - - 38a3f48e by Raymond Toy at 2017-09-02T14:01:45-07:00 More debugging to see what we have - - - - - 745ad37b by Raymond Toy at 2017-09-02T14:06:26-07:00 Don't need to do a git clone; install /usr/bin/time too. The runner already has the git repo checked out at $PWD, so we're ready to go. Try to install time so build.sh will run. - - - - - 7bdf20d1 by Raymond Toy at 2017-09-02T14:09:34-07:00 Use correct path to the snapshot build - - - - - 15a4c0f5 by Raymond Toy at 2017-09-02T14:59:47-07:00 Need to install bc Needed to update lisp/version. - - - - - b53bfd60 by Raymond Toy at 2017-09-02T21:56:52-07:00 Merge branch 'master' into rtoy-gitlab-ci - - - - - 7bc8b28c by Raymond Toy at 2017-09-03T05:10:25+00:00 Use correct pipeline marker for gitlab-ci branch - - - - - 24ed6116 by Raymond Toy at 2017-09-03T09:16:07-07:00 More testing of CI - Don't need to install git anymore - exit early from build script to see if that makes the test fail. - - - - - 9b8d5fc4 by Raymond Toy at 2017-09-03T09:24:18-07:00 Remove debugging stuff and early exit - Early exit (with non-zero exit code) does cause the pipeline to fail, as expected. - - - - - 3d227b6b by Raymond Toy at 2017-09-03T09:50:28-07:00 Install git (again) While not strictly necessary, make-dist.sh uses git to determine a default lisp-implmenetation-version. We could just use -V to do that, but I think it's best to have git so that the pipeline looks as much like normal development as possible. - - - - - c3d967c1 by Raymond Toy at 2017-09-05T20:40:19-07:00 Make test fail to see how pipeline works. - - - - - ea868e0f by Raymond Toy at 2017-09-05T20:54:33-07:00 Revert change. The failed test causes the pipeline to fail, as expected. - - - - - 37d69509 by Raymond Toy at 2017-09-06T04:05:12+00:00 Merge branch 'rtoy-gitlab-ci' into 'master' Enable gitlab continuous integration See merge request !22 - - - - - 2 changed files: - + .gitlab-ci.yml - README.md Changes: ===================================== .gitlab-ci.yml ===================================== --- /dev/null +++ b/.gitlab-ci.yml @@ -0,0 +1,12 @@ +before_script: + - apt-get update -qq && apt-get install -y wget bzip2 make gcc gcc-multilib time bc git + - wget -nv https://common-lisp.net/project/cmucl/downloads/snapshots/2017/04/cmucl-201… + - wget -nv https://common-lisp.net/project/cmucl/downloads/snapshots/2017/04/cmucl-201… + - mkdir snapshot + - (cd snapshot; tar xjf ../cmucl-2017-04-x86-linux.tar.bz2; tar xjf ../cmucl-2017-04-x86-linux.extra.tar.bz2) + +test: + script: + - bin/build.sh -B boot-2017-04-1 -C "" -o ./snapshot/bin/lisp + - bin/make-dist.sh -I dist-linux linux-4 + - bin/run-tests.sh -l dist-linux/bin/lisp 2>&1 | tee test.log ===================================== README.md ===================================== --- a/README.md +++ b/README.md @@ -1,3 +1,5 @@ +[![pipeline status](https://gitlab.common-lisp.net/cmucl/cmucl/badges/rtoy-gitlab-ci/pi… + CMUCL is a free, high performance implementation of the Common Lisp programming language which runs on most major Unix platforms. It mainly conforms to the ANSI Common Lisp standard. CMUCL provides a @@ -50,6 +52,4 @@ Here is a summary of its main features: maintained and improved by a team of volunteers collaborating over the Internet. -For the latest news and other information, see [the wiki](https://gitlab.common-lisp.net/cmucl/cmucl/wikis/home). - -[![pipeline status](https://gitlab.common-lisp.net/cmucl/cmucl/badges/master/pipeline.s… \ No newline at end of file +For the latest news and other information, see [the wiki](https://gitlab.common-lisp.net/cmucl/cmucl/wikis/home). \ No newline at end of file View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/compare/4312fc445efed2b1976227b7… --- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/compare/4312fc445efed2b1976227b7… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][rtoy-gitlab-ci] Revert change.
by Raymond Toy 06 Sep '17

06 Sep '17

Raymond Toy pushed to branch rtoy-gitlab-ci at cmucl / cmucl Commits: ea868e0f by Raymond Toy at 2017-09-05T20:54:33-07:00 Revert change. The failed test causes the pipeline to fail, as expected. - - - - - 1 changed file: - tests/trig.lisp Changes: ===================================== tests/trig.lisp ===================================== --- a/tests/trig.lisp +++ b/tests/trig.lisp @@ -16,7 +16,7 @@ (define-test sin.very-small "Tests sin for the case of |x| < 2^-27, but not 0." (:tag :sin) - (assert-eql (scale-float 1d0 -27) + (assert-eql (scale-float 1d0 -28) (sin (scale-float 1d0 -28)))) (define-test sin.no-reduction View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/ea868e0f11196d22304a37d94… --- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/ea868e0f11196d22304a37d94… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][rtoy-gitlab-ci] Make test fail to see how pipeline works.
by Raymond Toy 06 Sep '17

06 Sep '17

Raymond Toy pushed to branch rtoy-gitlab-ci at cmucl / cmucl Commits: c3d967c1 by Raymond Toy at 2017-09-05T20:40:19-07:00 Make test fail to see how pipeline works. - - - - - 1 changed file: - tests/trig.lisp Changes: ===================================== tests/trig.lisp ===================================== --- a/tests/trig.lisp +++ b/tests/trig.lisp @@ -16,7 +16,7 @@ (define-test sin.very-small "Tests sin for the case of |x| < 2^-27, but not 0." (:tag :sin) - (assert-eql (scale-float 1d0 -28) + (assert-eql (scale-float 1d0 -27) (sin (scale-float 1d0 -28)))) (define-test sin.no-reduction View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/c3d967c1ed0b08f7e2f3e0f4f… --- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/c3d967c1ed0b08f7e2f3e0f4f… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][rtoy-gitlab-ci] Install git (again)
by Raymond Toy 03 Sep '17

03 Sep '17

Raymond Toy pushed to branch rtoy-gitlab-ci at cmucl / cmucl Commits: 3d227b6b by Raymond Toy at 2017-09-03T09:50:28-07:00 Install git (again) While not strictly necessary, make-dist.sh uses git to determine a default lisp-implmenetation-version. We could just use -V to do that, but I think it's best to have git so that the pipeline looks as much like normal development as possible. - - - - - 1 changed file: - .gitlab-ci.yml Changes: ===================================== .gitlab-ci.yml ===================================== --- a/.gitlab-ci.yml +++ b/.gitlab-ci.yml @@ -1,5 +1,5 @@ before_script: - - apt-get update -qq && apt-get install -y wget bzip2 make gcc gcc-multilib time bc + - apt-get update -qq && apt-get install -y wget bzip2 make gcc gcc-multilib time bc git - wget -nv https://common-lisp.net/project/cmucl/downloads/snapshots/2017/04/cmucl-201… - wget -nv https://common-lisp.net/project/cmucl/downloads/snapshots/2017/04/cmucl-201… - mkdir snapshot @@ -9,4 +9,4 @@ test: script: - bin/build.sh -B boot-2017-04-1 -C "" -o ./snapshot/bin/lisp - bin/make-dist.sh -I dist-linux linux-4 - - bin/run-tests.sh -l dist-linux/bin/lisp + - bin/run-tests.sh -l dist-linux/bin/lisp 2>&1 | tee test.log View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/3d227b6ba0ff577f2130d84d6… --- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/3d227b6ba0ff577f2130d84d6… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][rtoy-gitlab-ci] Remove debugging stuff and early exit
by Raymond Toy 03 Sep '17

03 Sep '17

Raymond Toy pushed to branch rtoy-gitlab-ci at cmucl / cmucl Commits: 9b8d5fc4 by Raymond Toy at 2017-09-03T09:24:18-07:00 Remove debugging stuff and early exit - Early exit (with non-zero exit code) does cause the pipeline to fail, as expected. - - - - - 1 changed file: - .gitlab-ci.yml Changes: ===================================== .gitlab-ci.yml ===================================== --- a/.gitlab-ci.yml +++ b/.gitlab-ci.yml @@ -1,5 +1,4 @@ before_script: - - ls -F - apt-get update -qq && apt-get install -y wget bzip2 make gcc gcc-multilib time bc - wget -nv https://common-lisp.net/project/cmucl/downloads/snapshots/2017/04/cmucl-201… - wget -nv https://common-lisp.net/project/cmucl/downloads/snapshots/2017/04/cmucl-201… @@ -8,10 +7,6 @@ before_script: test: script: - - echo $SHELL - - PS1='\w \$ ' - - type -all time - - exit 1 - bin/build.sh -B boot-2017-04-1 -C "" -o ./snapshot/bin/lisp - bin/make-dist.sh -I dist-linux linux-4 - bin/run-tests.sh -l dist-linux/bin/lisp View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/9b8d5fc4e928deb7925a4ff19… --- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/9b8d5fc4e928deb7925a4ff19… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0

[Git][cmucl/cmucl][rtoy-gitlab-ci] More testing of CI
by Raymond Toy 03 Sep '17

03 Sep '17

Raymond Toy pushed to branch rtoy-gitlab-ci at cmucl / cmucl Commits: 24ed6116 by Raymond Toy at 2017-09-03T09:16:07-07:00 More testing of CI - Don't need to install git anymore - exit early from build script to see if that makes the test fail. - - - - - 1 changed file: - .gitlab-ci.yml Changes: ===================================== .gitlab-ci.yml ===================================== --- a/.gitlab-ci.yml +++ b/.gitlab-ci.yml @@ -1,6 +1,6 @@ before_script: - ls -F - - apt-get update -qq && apt-get install -y wget bzip2 git make gcc gcc-multilib time bc + - apt-get update -qq && apt-get install -y wget bzip2 make gcc gcc-multilib time bc - wget -nv https://common-lisp.net/project/cmucl/downloads/snapshots/2017/04/cmucl-201… - wget -nv https://common-lisp.net/project/cmucl/downloads/snapshots/2017/04/cmucl-201… - mkdir snapshot @@ -11,6 +11,7 @@ test: - echo $SHELL - PS1='\w \$ ' - type -all time + - exit 1 - bin/build.sh -B boot-2017-04-1 -C "" -o ./snapshot/bin/lisp - bin/make-dist.sh -I dist-linux linux-4 - bin/run-tests.sh -l dist-linux/bin/lisp View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/24ed611667f43b267e076a031… --- View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/commit/24ed611667f43b267e076a031… You're receiving this email because of your account on gitlab.common-lisp.net.

1 0