/[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.34 by pfdietz, Sun Nov 2 10:55:50 2003 UTC revision 1.35 by pfdietz, Wed Nov 5 01:26:09 2003 UTC
# Line 1960  Line 1960 
1960     -24 5657943)     -24 5657943)
1961    5520737)    5520737)
1962    
1963    ;;; sbcl bug (0.8.5.19)
1964    ;;; "The value NIL is not of type SB-C::REF."
1965    
1966    (deftest misc.152
1967      (funcall
1968       (compile nil
1969                '(lambda (a)
1970                   (block b5
1971                     (let ((v1 (let ((v8 (unwind-protect 9365)))
1972                                 8862008)))
1973                       (*
1974                        (return-from b5
1975                          (labels ((%f11 (f11-1) f11-1))
1976                            (%f11 87246015)))
1977                        (return-from b5
1978                          (setq v1
1979                                (labels ((%f6 (f6-1 f6-2 f6-3) v1))
1980                                  (dpb (unwind-protect a)
1981                                       (byte 18 13)
1982                                       (labels ((%f4 () 27322826))
1983                                         (%f6 -2 -108626545 (%f4))))))))))))
1984       -6)
1985      87246015)

Legend:
Removed from v.1.34  
changed lines
  Added in v.1.35

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