/[gcl]/gcl/ansi-tests/misc.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/misc.lsp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.233 by pfdietz, Mon Mar 21 13:53:15 2005 UTC revision 1.234 by pfdietz, Tue Mar 22 00:28:56 2005 UTC
# Line 10653  Broken at C::WT-MAKE-CLOSURE. Line 10653  Broken at C::WT-MAKE-CLOSURE.
10653    (equalp #*0 "0")    (equalp #*0 "0")
10654    nil)    nil)
10655    
10656    ;;; clisp 21 Mar 2005 (-ansi -q, x86 Linux, gcc 3.2.2)
10657    ;;; *** - Compiler bug!! Occurred in SP-DEPTH at <0.
10658    
10659    (deftest misc.593
10660      (funcall
10661       (compile
10662        nil
10663        '(lambda (a b)
10664           (declare (ignorable a b))
10665           (declare (optimize (space 3) (debug 0) (safety 1)
10666                              (compilation-speed 3) (speed 1)))
10667           (prog2
10668               (catch 'ct1 (if (or (and t (not (and (and (or a t) nil) nil))) nil)
10669                               a
10670                             (reduce #'(lambda (lmv5 lmv2) 0) (vector b 0 a))))
10671               0)))
10672       2212755 3154856)
10673      0)

Legend:
Removed from v.1.233  
changed lines
  Added in v.1.234

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26