r2753: move files

[clsql.git] / clsql-mysql / testing / mysql-struct-size.cl

diff --git a/clsql-mysql/testing/mysql-struct-size.cl b/clsql-mysql/testing/mysql-struct-size.cl
deleted file mode 100644 (file)
index 60dfd92..0000000
--- a/clsql-mysql/testing/mysql-struct-size.cl
+++ /dev/null
@@ -1,11 +0,0 @@
-(in-package :mysql)
-
-#+lispworks 
-(progn
-  (setq c (fli:allocate-foreign-object :type 'mysql-mysql))
-  (format t "~&Size MYSQL structure: ~d" (fli:pointer-element-size c)))
-#+allegro 
-(progn
-  (setq c (ff:allocate-fobject 'mysql-mysql :foreign))
-  (format t "~&Size MYSQL structure: ~A" c))
-