Improved behaviour when the C module is disabled.

Rev: lib/modules/Sql.pmod/msql.pike:1.5
Rev: lib/modules/Sql.pmod/mysql.pike:1.7
Rev: lib/modules/Sql.pmod/odbc.pike:1.3
Rev: lib/modules/Sql.pmod/oracle.pike:1.3
Rev: lib/modules/Sql.pmod/postgres.pike:1.6

lib/modules/Sql.pmod/msql.pike

@@ -13,8 +13,5 @@ mapping(string:mapping(string:mixed)) list_fields(string table, string|void wild
 			{return m[s];},result));
 }
 #else /* !constant(Msql.msql) */
-void create()
-{
-  destruct();
-}
+#error "mSQL support not available.\n"
 #endif /* constant(Msql.msql) */

lib/modules/Sql.pmod/mysql.pike

 /*
- * $Id: mysql.pike,v 1.6 1998/10/17 03:05:49 grubba Exp $
+ * $Id: mysql.pike,v 1.7 1999/06/14 23:08:37 grubba Exp $
  *
  * Glue for the Mysql-module
  */
 
 //.
 //. File:	mysql.pike
-//. RCSID:	$Id: mysql.pike,v 1.6 1998/10/17 03:05:49 grubba Exp $
+//. RCSID:	$Id: mysql.pike,v 1.7 1999/06/14 23:08:37 grubba Exp $
 //. Author:	Henrik Grubbstrm (grubba@idonex.se)
 //.
 //. Synopsis:	Implements the glue to the Mysql-module.
@@ -129,8 +129,5 @@ int decode_datetime (string timestr)
 }
 
 #else /* !constant(Mysql.mysql) */
-void create()
-{
-  destruct();
-}
+#error "Mysql support not available.\n"
 #endif /* constant(Mysql.mysql) */

lib/modules/Sql.pmod/odbc.pike

 /*
- * $Id: odbc.pike,v 1.2 1998/10/17 03:00:34 grubba Exp $
+ * $Id: odbc.pike,v 1.3 1999/06/14 23:08:38 grubba Exp $
  *
  * Glue for the ODBC-module
  */
@@ -7,8 +7,5 @@
 #if constant(Odbc.odbc)
 inherit Odbc.odbc;
 #else /* !constant(Odbc.odbc) */
-void create()
-{
-  destruct();
-}
+#error "ODBC support not available.\n"
 #endif /* constant(Odbc.odbc) */

lib/modules/Sql.pmod/oracle.pike

 /*
- * $Id: oracle.pike,v 1.2 1998/10/17 02:59:23 grubba Exp $
+ * $Id: oracle.pike,v 1.3 1999/06/14 23:08:39 grubba Exp $
  *
  * Glue for the Oracle-module
  */
@@ -7,8 +7,5 @@
 #if constant(Oracle.oracle)
 inherit Oracle.oracle;
 #else /* !constant(Oracle.oracle) */
-void create()
-{
-  destruct();
-}
+#error "Oracle support not available.\n"
 #endif /* constant(Oracle.oracle) */

lib/modules/Sql.pmod/postgres.pike

@@ -2,7 +2,7 @@
  * This is part of the Postgres module for Pike.
  * (C) 1997 Francesco Chemolli <kinkie@kame.usr.dsi.unimi.it>
  *
- * $Id: postgres.pike,v 1.5 1998/10/17 02:54:58 grubba Exp $
+ * $Id: postgres.pike,v 1.6 1999/06/14 23:08:40 grubba Exp $
  *
  */
 
@@ -125,8 +125,5 @@ mapping(string:array(mixed)) list_fields (string table, void|string wild) {
 	return ret;
 }
 #else /* !constant(Postgres.postgres) */
-void create()
-{
-  destruct();
-}
+#error "Prostgras support not available.\n"
 #endif /* constant(Postgres.postgres) */