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

[ehuelsmann at common-lisp.net]

Author: ehuelsmann
Date: Wed Aug  1 03:39:07 2012
New Revision: 14035

Log:
Fix #226 (Invocation of an undefined function in a fresh ABCL crashes):
make sure the PRINT-OBJECT generic function exists
before defining methods on it.

Modified:
   trunk/abcl/src/org/armedbear/lisp/format.lisp

Modified: trunk/abcl/src/org/armedbear/lisp/format.lisp
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/format.lisp	Tue Jul 31 11:17:01 2012	(r14034)
+++ trunk/abcl/src/org/armedbear/lisp/format.lisp	Wed Aug  1 03:39:07 2012	(r14035)
@@ -33,6 +33,8 @@
 
 (in-package "SYSTEM")
 
+(require "PRINT-OBJECT")
+
 ;;; From primordial-extensions.lisp.
 
 ;;; Concatenate together the names of some strings and symbols,