Raymond Toy pushed to branch issue-256-loop-var-nil at cmucl / cmucl

Commits: b9f04ee4 by Raymond Toy at 2024-01-30T07:47:03-08:00 Add test for (loop for var nil ...)

Just verifies that the loop works.

- - - - -

1 changed file:

- + tests/loop.lisp

Changes:

===================================== tests/loop.lisp ===================================== @@ -0,0 +1,14 @@ +;;; Tests from gitlab issues + +(defpackage :loop-tests + (:use :cl :lisp-unit)) + +(in-package "LOOP-TESTS") + +(define-test loop-var-nil + (:tag :issues) + ;; Just verify that (loop for var nil ...) works. Previously it + ;; signaled an error. See Gitlab issue #256. + (assert-equal '(1 2) + (loop for var nil from 1 to 2 collect var))) +

View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/b9f04ee4af21be571ecc3124...