/[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.244 by pfdietz, Tue Jun 28 14:18:28 2005 UTC revision 1.245 by pfdietz, Wed Jul 13 02:47:59 2005 UTC
# Line 10795  Broken at C::WT-MAKE-CLOSURE. Line 10795  Broken at C::WT-MAKE-CLOSURE.
10795    (let ((form '(lambda () (if (oddp (progn (vector) 3747237)) 'a nil))))    (let ((form '(lambda () (if (oddp (progn (vector) 3747237)) 'a nil))))
10796      (loop repeat 10 collect (funcall (compile nil form))))      (loop repeat 10 collect (funcall (compile nil form))))
10797    (a a a a a a a a a a))    (a a a a a a a a a a))
10798    
10799    ;;; gcl 2.7.0 (12 Jul 2005)
10800    ;;; Error in WHEN [or a callee]: The GO tag #:G3614 is missing.
10801    
10802    (deftest misc.603
10803      (funcall (compile nil '(lambda () (let ((x (values 0))) 0))))
10804      0)

Legend:
Removed from v.1.244  
changed lines
  Added in v.1.245

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