X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=interfaces%2Fmysql%2Fmysql-package.cl;h=afacc6216270bcd075df0ec51df37b4f1985659e;hb=42a951e9f7152e7c145958f4dfed41d4e865c9fd;hp=450efc287acee8022a001ab596531dc9fddca50a;hpb=8213ff48f5362c3d4792444c929f50bd128bd044;p=clsql.git

diff --git a/interfaces/mysql/mysql-package.cl b/interfaces/mysql/mysql-package.cl
index 450efc2..afacc62 100644
--- a/interfaces/mysql/mysql-package.cl
+++ b/interfaces/mysql/mysql-package.cl
@@ -7,7 +7,7 @@
 ;;;; Programmers:   Kevin M. Rosenberg
 ;;;; Date Started:  Feb 2002
 ;;;;
-;;;; $Id: mysql-package.cl,v 1.1 2002/03/23 14:04:52 kevin Exp $
+;;;; $Id: mysql-package.cl,v 1.7 2002/03/27 08:09:25 kevin Exp $
 ;;;;
 ;;;; This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -20,8 +20,10 @@
 (in-package :cl-user)
 
 (defpackage :mysql
-    (:use :common-lisp)
+    (:use :common-lisp :clsql-uffi)
     (:export 
+     #:database-library-loaded
+     
      #:mysql-socket
      #:mysql-book
      #:mysql-byte
@@ -59,6 +61,7 @@
      #:mysql-row
      #:mysql-field-offset
      #:mysql-row-offset
+     #:mysql-field-vector
      #:mysql-data
      #:mysql-options
      #:mysql-mysql-option
@@ -108,6 +111,8 @@
      #:mysql-fetch-row
      #:mysql-fetch-lengths
      #:mysql-fetch-field
+     #:mysql-fetch-fields
+     #:mysql-fetch-field-direct
      #:mysql-escape-string
      #:mysql-debug
      #:mysql-num-rows
@@ -121,5 +126,7 @@
      #:mysql-info
      #:mysql-info-string
      #:mysql-data-seek
+     
+     #:make-64-bit-integer
      )
     (:documentation "This is the low-level interface MySQL."))