mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 20:00:19 +02:00
Code Activity

Remove duplicate test in `tree-il.test'.

Browse source 
* test-suite/tests/tree-il.test ("partial evaluation"): Remove duplicate
  test for `(cons 0 (cons 1 (cons 2 (list 3 4 5))))'.
This commit is contained in:
Ludovic Courtès 2012-04-21 23:08:49 +02:00
parent 0f6dd25023
commit d8fe367a31
1 changed files with 0 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

7
test-suite/tests/tree-il.test
View file

@ -704,13 +704,6 @@
(apply (primitive list)
(const 0) (const 1) (const 2) (const 3) (const 4) (const 5)))
(pass-if-peval
;; First order, coalesced, mutability preserved.
(cons 0 (cons 1 (cons 2 (list 3 4 5))))
;; This must not be a constant.
(apply (primitive list)
(const 0) (const 1) (const 2) (const 3) (const 4) (const 5)))
(pass-if-peval
;; First order, coalesced, immutability preserved.
(cons 0 (cons 1 (cons 2 '(3 4 5))))