diff --git a/lib/modules/Sql.pmod/sql_array_result.pike b/lib/modules/Sql.pmod/sql_array_result.pike
index e1b25d4382ab38e18354362e8451381db5e54fd9..d83a7669d1f5b039c36fb073f98b61484b531e1b 100644
--- a/lib/modules/Sql.pmod/sql_array_result.pike
+++ b/lib/modules/Sql.pmod/sql_array_result.pike
@@ -1,12 +1,14 @@
 
+#pike __REAL_VERSION__
+
 inherit .sql_result;
 
 array master_res;
 
 void create(array res) {
-  master_res = res;
   if(!res || !arrayp(res))
-    error("Bad argument to sql_array_result\n");
+    error("Bad argument.\n");
+  master_res = res;
 }
 
 int num_rows() {
@@ -21,8 +23,8 @@ int eof() {
   return index >= sizeof(master_res);
 }
 
+// Only supports the name field.
 array(mapping(string:mixed)) fetch_fields() {
-  /* Only supports the name field */
   array(mapping(string:mixed)) res = allocate(sizeof(master_res[0]));
   int i;
 
@@ -33,7 +35,7 @@ array(mapping(string:mixed)) fetch_fields() {
 }
 
 void seek(int skip) {
-  if(skip<0) error("Skip argument not positive\n");
+  if(skip<0) error("Skip argument not positive.\n");
   index += skip;
 }
 
diff --git a/lib/modules/Sql.pmod/sql_object_result.pike b/lib/modules/Sql.pmod/sql_object_result.pike
index 2cb8ac56cfd6efeb7520a505e2d27b146bbb846e..9cd83c7dbdddb81641750202c9b45d5bbb1793d3 100644
--- a/lib/modules/Sql.pmod/sql_object_result.pike
+++ b/lib/modules/Sql.pmod/sql_object_result.pike
@@ -1,12 +1,14 @@
 
+#pike __REAL_VERSION__
+
 inherit .sql_result;
 
 object master_res;
 
 void create(object res) {
-  master_res = res;
   if(!res || !objectp(res))
-    error("Bad argument to sql_array_result\n");
+    error("Bad argument.\n");
+  master_res = res;
 }
 
 int num_rows() {
@@ -24,7 +26,7 @@ array(mapping(string:mixed)) fetch_fields() {
 void seek(int skip) {
 
   if(functionp(master_res->seek)) {
-    if(skip<0) error("Skip argument not positive\n");
+    if(skip<0) error("Skip argument not positive.\n");
     index += skip;
     master_res->seek(skip);
   }
diff --git a/lib/modules/Sql.pmod/sql_result.pike b/lib/modules/Sql.pmod/sql_result.pike
index a81722d058eae69698cf0308d7c6c15a0df23384..651ab1a31bad5ca2d496fca01af9ffc444a052b2 100644
--- a/lib/modules/Sql.pmod/sql_result.pike
+++ b/lib/modules/Sql.pmod/sql_result.pike
@@ -1,5 +1,5 @@
 /*
- * $Id: sql_result.pike,v 1.13 2005/04/10 03:29:40 nilsson Exp $
+ * $Id: sql_result.pike,v 1.14 2005/04/10 03:50:27 nilsson Exp $
  *
  * Implements the generic result module of the SQL-interface
  *
@@ -26,9 +26,9 @@ static void create(mixed res);
 static string _sprintf(int type, mapping|void flags)
 {
   int f;
-  return type=='O' && sprintf("%O(/* row %d/%d, %d field%s */)",
-			      this_program, index, num_rows(),
-			      f=num_fields(), f>1?"s":"");
+  return type=='O' && master_res && sprintf("%O(/* row %d/%d, %d field%s */)",
+					    this_program, index, num_rows(),
+					    f=num_fields(), f>1?"s":"");
 }
 
 //! Returns the number of rows in the result.