r10812: 7 Nov 2005 Kevin Rosenberg <kevin@rosenberg.net>

[clsql.git] / db-odbc / odbc-constants.lisp

diff --git a/db-odbc/odbc-constants.lisp b/db-odbc/odbc-constants.lisp
index 591a3afa43fcc76c0f7a3f0df4e15bbd62652eae..0315e444e3a38627b2cd92fb3c8414a1d1b96a0d 100644 (file)
--- a/db-odbc/odbc-constants.lisp
+++ b/db-odbc/odbc-constants.lisp
@@ -1,4 +1,4 @@
-;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Package: odbc -*-
+ ;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Package: odbc -*-
 ;;;; *************************************************************************
 ;;;; FILE IDENTIFICATION
 ;;;;
@@ -24,6 +24,13 @@
 
 ;; (defconstant $ODBCVER       #x0210)
 
+
+;; for new SQLAllocHandle functiion
+(defconstant $SQL_HANDLE_ENV 1)
+(defconstant $SQL_HANDLE_DBC 2)
+(defconstant $SQL_HANDLE_STMT 3)
+(defconstant $SQL_HANDLE_DESC 4)
+
 ;; generally useful constants
 (defconstant $SQL_SPEC_MAJOR 2)                ;; Major version of specification 
 (defconstant $SQL_SPEC_MINOR 10)       ;; Minor version of specification