[Sbcl-commits] master: note FIRST fix in NEWS, fix stupid typo in tests

[Nikodemus S. <de...@us...>]

The branch "master" has been updated in SBCL:
       via  dd09e391c3c780c948d02ce7bc214a8a9155aef3 (commit)
      from  c4328785e9e1bd3538ee8d32fa27118ccf7eb388 (commit)

- Log -----------------------------------------------------------------
commit dd09e391c3c780c948d02ce7bc214a8a9155aef3
Author: Nikodemus Siivola <nik...@ra...>
Date:   Sun Jan 20 13:16:31 2013 +0200

    note FIRST fix in NEWS, fix stupid typo in tests
---
 NEWS                     |    1 +
 tests/compiler.pure.lisp |    4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/NEWS b/NEWS
index 220dbd3..fb73ea8 100644
--- a/NEWS
+++ b/NEWS
@@ -8,6 +8,7 @@ changes relative to sbcl-1.1.3:
   * bug fix: optimizations to MAKE-INSTANCE with literal list initargs no
     longer cause infinite loops (on circular data) or violate eqlity
     constraints.  (lp#1099708)
+  * bug fix: FIRST was not being open coded. (regression from 1.1.0)
 
 changes in sbcl-1.1.3 relative to sbcl-1.1.2:
   * enhancement: warnings about bad locale settings, LANG, LC_CTYPE, etc.
diff --git a/tests/compiler.pure.lisp b/tests/compiler.pure.lisp
index 624feeb..833c5ee 100644
--- a/tests/compiler.pure.lisp
+++ b/tests/compiler.pure.lisp
@@ -4371,10 +4371,10 @@
                              (sb-c::mask-signed-field 31 (- x 1055131947))))))
     (assert (= (funcall fun 10038) -1055121909))))
 
-(with-rest (:name :first-open-coded)
+(with-test (:name :first-open-coded)
   (let ((fun (compile nil `(lambda (x) (first x)))))
     (assert (not (ctu:find-named-callees fun)))))
 
-(with-rest (:name :second-open-coded)
+(with-test (:name :second-open-coded)
   (let ((fun (compile nil `(lambda (x) (second x)))))
     (assert (not (ctu:find-named-callees fun)))))

-----------------------------------------------------------------------


hooks/post-receive
-- 
SBCL