projects
/
clsql.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r9519: add prepared statements for postgresql
[clsql.git]
/
db-odbc
/
odbc-constants.lisp
diff --git
a/db-odbc/odbc-constants.lisp
b/db-odbc/odbc-constants.lisp
index cddb4be8288d1377c6a8d375440cabb108185ca5..c16e2a76869201da13e5b15add9ea95147fdc129 100644
(file)
--- a/
db-odbc/odbc-constants.lisp
+++ b/
db-odbc/odbc-constants.lisp
@@
-6,7
+6,7
@@
;;;; Purpose: Constants for UFFI interface to ODBC
;;;; Authors: Kevin M. Rosenberg and Paul Meurer
;;;;
;;;; Purpose: Constants for UFFI interface to ODBC
;;;; Authors: Kevin M. Rosenberg and Paul Meurer
;;;;
-;;;; $Id
: odbc-package.lisp 7061 2003-09-07 06:34:45Z kevin
$
+;;;; $Id$
;;;;
;;;; This file, part of CLSQL, is Copyright (c) 2004 by Kevin M. Rosenberg
;;;; and Copyright (C) Paul Meurer 1999 - 2001. All rights reserved.
;;;;
;;;; This file, part of CLSQL, is Copyright (c) 2004 by Kevin M. Rosenberg
;;;; and Copyright (C) Paul Meurer 1999 - 2001. All rights reserved.
@@
-18,7
+18,11
@@
(in-package #:odbc)
(in-package #:odbc)
-(defconstant $ODBCVER #x0210)
+;; on SuSE AMD64 9.0, unixODBC is compiled with with SQLLEN being 4 bytes long
+(defconstant $ODBC-LONG-TYPE :int)
+(defconstant $ODBC-ULONG-TYPE :unsigned-int)
+
+;; (defconstant $ODBCVER #x0210)
;; generally useful constants
(defconstant $SQL_SPEC_MAJOR 2) ;; Major version of specification
;; generally useful constants
(defconstant $SQL_SPEC_MAJOR 2) ;; Major version of specification
@@
-798,7
+802,6
@@
(defconstant $SQL_POSITION 0) ;; 1.0 FALSE
(defconstant $SQL_REFRESH 1) ;; 1.0 TRUE
(defconstant $SQL_POSITION 0) ;; 1.0 FALSE
(defconstant $SQL_REFRESH 1) ;; 1.0 TRUE
-; #if (ODBCVER >= #x0200))
(defconstant $SQL_UPDATE 2)
(defconstant $SQL_DELETE 3)
(defconstant $SQL_ADD 4)
(defconstant $SQL_UPDATE 2)
(defconstant $SQL_DELETE 3)
(defconstant $SQL_ADD 4)