;;;; Author: Kevin M. Rosenberg
;;;; Created: Mar 2002
;;;;
-;;;; $Id$
-;;;;
-;;;; This file, part of CLSQL, is Copyright (c) 2002-2004 by Kevin M. Rosenberg
+;;;; This file, part of CLSQL, is Copyright (c) 2002-2010 by Kevin M. 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
"mismatch on a. inserted: ~a returned: ~a" len (length a)))
)))
nil)
-
- (deftest :basic/i18n/1
- (first (query "SELECT 'Iñtërnâtiônàlizætiøn'"
- :flatp t :field-names nil))
- "Iñtërnâtiônàlizætiøn")
-
- (deftest :basic/i18n/2
- (first (query "SELECT 'Iñtërnâtiônàližætiøn'"
- :flatp t :field-names nil))
- "Iñtërnâtiônàližætiøn")
))