[armedbear-cvs] r11498 - trunk/abcl/src/org/armedbear/lisp

[Erik Huelsmann]

Author: ehuelsmann
Date: Sun Dec 28 20:49:11 2008
New Revision: 11498

Log:
Follow up to r11494: +lisp-stream-abstract-class+ doesn't exist; +lisp-stream-class+ does.

Modified:
   trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp

Modified: trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp	(original)
+++ trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp	Sun Dec 28 20:49:11 2008
@@ -7889,7 +7889,7 @@
                             (CONS       +lisp-cons-class+)
                             (HASH-TABLE +lisp-hash-table-class+)
                             (FIXNUM     +lisp-fixnum-class+)
-			    (STREAM     +lisp-abstract-stream-class+)
+			    (STREAM     +lisp-stream-class+)
                             (STRING     +lisp-abstract-string-class+)
                             (VECTOR     +lisp-abstract-vector-class+)))
         (expected-type-java-symbol-name (case expected-type