Index: /trunk/ccl/library/lispequ.lisp
===================================================================
--- /trunk/ccl/library/lispequ.lisp	(revision 4912)
+++ /trunk/ccl/library/lispequ.lisp	(revision 4913)
@@ -1300,4 +1300,5 @@
   open-input
   open-output
+  open-character
   open-binary
   file-stream)
