--- parser3/src/classes/void.C	2004/06/22 14:12:57	1.34
+++ parser3/src/classes/void.C	2007/04/23 10:30:10	1.38
@@ -1,11 +1,11 @@
 /** @file
 	Parser: @b VOID parser class.
 
-	Copyright (c) 2001-2004 ArtLebedev Group (http://www.artlebedev.com)
+	Copyright (c) 2001-2005 ArtLebedev Group (http://www.artlebedev.com)
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
-static const char * const IDENT_VOID_C="$Date: 2004/06/22 14:12:57 $";
+static const char * const IDENT_VOID_C="$Date: 2007/04/23 10:30:10 $";
 
 #include "classes.h"
 #include "pa_vmethod_frame.h"
@@ -14,6 +14,7 @@ static const char * const IDENT_VOID_C="
 #include "pa_vint.h"
 #include "pa_vdouble.h"
 #include "pa_vvoid.h"
+#include "pa_vbool.h"
 #include "pa_sql_connection.h"
 
 // externs
@@ -59,6 +60,12 @@ static void _double(Request& r, MethodPa
 		params.count()==0?vvoid.as_double():params.as_double(0, "default must be double", r)));
 }
 
+static void _bool(Request& r, MethodParams& params) {
+	VVoid& vvoid=GET_SELF(r, VVoid);
+	r.write_no_lang(*new VBool(
+		params.count()==0?vvoid.as_bool():params.as_bool(0, "default must be bool", r)));
+}
+
 #ifndef DOXYGEN
 class Void_sql_event_handlers: public SQL_Driver_query_event_handlers {
 	const String& statement_string;
@@ -67,7 +74,7 @@ public:
 	bool add_column(SQL_Error& /*error*/, const char* /*str*/, size_t /*length*/) { /* ignore */ return false; }
 	bool before_rows(SQL_Error& error) {
 		// there are some result rows, which is wrong
-		error=SQL_Error("parser.runtime",
+		error=SQL_Error(PARSER_RUNTIME,
 			/*statement_string,*/
 			"must return nothing");
 		return true;
@@ -87,7 +94,7 @@ static void _sql(Request& r, MethodParam
 	HashStringValue* bind=0;
 	if(params.count()>1) {
 		Value& voptions=params.as_no_junction(1, "options must be hash, not code");
-		if(!voptions.is_string())
+		if(voptions.is_defined() && !voptions.is_string())
 			if(HashStringValue* options=voptions.get_hash()) {
 				int valid_options=0;
 				if(Value* vbind=options->get(sql_bind_name)) {
@@ -95,11 +102,11 @@ static void _sql(Request& r, MethodParam
 					bind=vbind->get_hash();
 				}
 				if(valid_options!=options->count())
-					throw Exception("parser.runtime",
+					throw Exception(PARSER_RUNTIME,
 						0,
 						"called with invalid option");
 			} else
-				throw Exception("parser.runtime",
+				throw Exception(PARSER_RUNTIME,
 					0,
 					"options must be hash");
 	}
@@ -128,7 +135,7 @@ static void _sql(Request& r, MethodParam
 static void _left_right(Request& r, MethodParams& params) {
 	ssize_t sn=params.as_int(0, "n must be int", r);
 	if(sn<0)
-		throw Exception("parser.runtime",
+		throw Exception(PARSER_RUNTIME,
 			0, 
 			"n(%d) must be >=0", sn);
 
@@ -138,14 +145,14 @@ static void _left_right(Request& r, Meth
 static void _mid(Request& r, MethodParams& params) {
 	ssize_t sbegin=params.as_int(0, "p must be int", r);
 	if(sbegin<0)
-		throw Exception("parser.runtime",
+		throw Exception(PARSER_RUNTIME,
 			0, 
 			"p(%d) must be >=0", sbegin);
 
 	if(params.count()>1) {
 		ssize_t sn=params.as_int(1, "n must be int", r);
 		if(sn<0)
-			throw Exception("parser.runtime",
+			throw Exception(PARSER_RUNTIME,
 				0, 
 				"n(%d) must be >=0", sn);
 	}
@@ -170,6 +177,10 @@ MVoid::MVoid(): Methoded("void") {
 	// ^void.double(default)
 	add_native_method("double", Method::CT_DYNAMIC, _double, 0, 1);
 
+	// ^void.bool[]
+	// ^void.bool(default)
+	add_native_method("bool", Method::CT_DYNAMIC, _bool, 0, 1);
+
 	// ^sql[query]
 	add_native_method("sql", Method::CT_STATIC, _sql, 1, 2);