;;;; $Id$
;;;;
;;;; This file, part of CLSQL, is Copyright (c) 2003 by Aurelio Bignoli
+;;;; and Copyright (c) 2003-2004 by Kevin Rosenberg
;;;;
;;;; CLSQL users are granted the rights to distribute and use this software
;;;; as governed by the terms of the Lisp Lesser GNU Public License
:code code
:message (if message
message
- (sqlite-error-string code)))))
+ (uffi:convert-from-cstring
+ (sqlite-error-string code))))))
(unless (signal condition)
(invoke-debugger condition))))