projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Version 6.6.2
[clsql.git]
/
examples
/
sqlite3
/
init-func
/
example.lisp
diff --git
a/examples/sqlite3/init-func/example.lisp
b/examples/sqlite3/init-func/example.lisp
index 82fa9d34910a5e5d50678b61446df7b04bff90c9..eb04c072d5044883e567fda2e2994bc4d3d642a2 100644
(file)
--- a/
examples/sqlite3/init-func/example.lisp
+++ b/
examples/sqlite3/init-func/example.lisp
@@
-41,19
+41,19
@@
"CREATE TABLE t1 (f1 CHAR(1), f2 CHAR(1) COLLATE ISO_8859_15_CI)")
;;;; Populate the table.
"CREATE TABLE t1 (f1 CHAR(1), f2 CHAR(1) COLLATE ISO_8859_15_CI)")
;;;; Populate the table.
-(clsql:execute-command "INSERT INTO t1 VALUES ('
à', 'à
')")
+(clsql:execute-command "INSERT INTO t1 VALUES ('
à', 'à
')")
(clsql:execute-command "INSERT INTO t1 VALUES ('a', 'a')")
(clsql:execute-command "INSERT INTO t1 VALUES ('A', 'A')")
(clsql:execute-command "INSERT INTO t1 VALUES ('a', 'a')")
(clsql:execute-command "INSERT INTO t1 VALUES ('A', 'A')")
-(clsql:execute-command "INSERT INTO t1 VALUES ('
é', 'é
')")
+(clsql:execute-command "INSERT INTO t1 VALUES ('
é', 'é
')")
(clsql:execute-command "INSERT INTO t1 VALUES ('e', 'e')")
(clsql:execute-command "INSERT INTO t1 VALUES ('E', 'E')")
(clsql:execute-command "INSERT INTO t1 VALUES ('e', 'e')")
(clsql:execute-command "INSERT INTO t1 VALUES ('E', 'E')")
-(clsql:execute-command "INSERT INTO t1 VALUES ('
ì', 'ì
')")
+(clsql:execute-command "INSERT INTO t1 VALUES ('
ì', 'ì
')")
(clsql:execute-command "INSERT INTO t1 VALUES ('i', 'i')")
(clsql:execute-command "INSERT INTO t1 VALUES ('I', 'I')")
(clsql:execute-command "INSERT INTO t1 VALUES ('i', 'i')")
(clsql:execute-command "INSERT INTO t1 VALUES ('I', 'I')")
-(clsql:execute-command "INSERT INTO t1 VALUES ('
ò', 'ò
')")
+(clsql:execute-command "INSERT INTO t1 VALUES ('
ò', 'ò
')")
(clsql:execute-command "INSERT INTO t1 VALUES ('o', 'o')")
(clsql:execute-command "INSERT INTO t1 VALUES ('O', 'O')")
(clsql:execute-command "INSERT INTO t1 VALUES ('o', 'o')")
(clsql:execute-command "INSERT INTO t1 VALUES ('O', 'O')")
-(clsql:execute-command "INSERT INTO t1 VALUES ('
ù', 'ù
')")
+(clsql:execute-command "INSERT INTO t1 VALUES ('
ù', 'ù
')")
(clsql:execute-command "INSERT INTO t1 VALUES ('u', 'u')")
(clsql:execute-command "INSERT INTO t1 VALUES ('U', 'U')")
(clsql:execute-command "INSERT INTO t1 VALUES ('u', 'u')")
(clsql:execute-command "INSERT INTO t1 VALUES ('U', 'U')")