--- parser3/src/classes/string.C	2004/02/27 15:24:03	1.134
+++ parser3/src/classes/string.C	2004/03/01 12:53:17	1.138
@@ -5,7 +5,7 @@
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
-static const char * const IDENT_STRING_C="$Date: 2004/02/27 15:24:03 $";
+static const char * const IDENT_STRING_C="$Date: 2004/03/01 12:53:17 $";
 
 #include "classes.h"
 #include "pa_vmethod_frame.h"
@@ -104,14 +104,25 @@ static void _double(Request& r, MethodPa
 }
 
 static void _left(Request& r, MethodParams& params) {
-	size_t n=(size_t)params.as_int(0, "n must be int", r);
-	
+	ssize_t sn=params.as_int(0, "n must be int", r);
+	if(sn<0)
+		throw Exception("parser.runtime",
+			0, 
+			"n(%d) must be >=0", sn);
+	size_t n=(size_t)sn;
+
 	const String& string=GET_SELF(r, VString).string();
 	r.write_assign_lang(string.mid(0, n));
 }
 
 static void _right(Request& r, MethodParams& params) {
-	size_t n=(size_t)params.as_int(0, "n must be int", r);
+	ssize_t sn=(size_t)params.as_int(0, "n must be int", r);
+	if(sn<0)
+		throw Exception("parser.runtime",
+			0, 
+			"n(%d) must be >=0", sn);
+	size_t n=(size_t)sn;
+	
 	
 	const String& string=GET_SELF(r, VString).string();
 	size_t length=string.length();
@@ -121,11 +132,25 @@ static void _right(Request& r, MethodPar
 static void _mid(Request& r, MethodParams& params) {
 	const String& string=GET_SELF(r, VString).string();
 
-	size_t p=(size_t)max(0, params.as_int(0, "p must be int", r));
-	size_t n=params.count()>1?
-		(size_t)max(0, params.as_int(1, "n must be int", r)):string.length();
+	ssize_t sbegin=params.as_int(0, "p must be int", r);
+	if(sbegin<0)
+		throw Exception("parser.runtime",
+			0, 
+			"p(%d) must be >=0", sbegin);
+	size_t begin=(size_t)sbegin;
+
+	size_t end;
+	if(params.count()>1) {
+		ssize_t sn=params.as_int(1, "n must be int", r);
+		if(sn<0)
+			throw Exception("parser.runtime",
+				0, 
+				"n(%d) must be >=0", sn);
+		end=begin+(size_t)sn;
+	} else 
+		end=string.length();
 	
-	r.write_assign_lang(string.mid(p, p+n));
+	r.write_assign_lang(string.mid(begin, end));
 }
 
 static void _pos(Request& r, MethodParams& params) {
@@ -503,9 +528,9 @@ static void _trim(Request& r, MethodPara
 	String::Trim_kind kind=String::TRIM_BOTH;
 	const char* chars=0;
 	if(params.count()>0) {
-		if(params.count()>1) { // [>>kind<<;chars]
-			const String& skind=params.as_string(0, 
-				"'where' must be string");
+		const String& skind=params.as_string(0, 
+			"'where' must be string");
+		if(skind.length())
 			if(skind==TRIM_START_OPTION)
 				kind=String::TRIM_START;
 			else if(skind==TRIM_END_OPTION)
@@ -515,11 +540,13 @@ static void _trim(Request& r, MethodPara
 			else
 				throw Exception("parser.runtime",
 					&skind,
-					"'kind' should be one of "TRIM_START_OPTION", "TRIM_BOTH_OPTION", "TRIM_END_OPTION);
-		}
+					"'kind' must be one of "TRIM_START_OPTION", "TRIM_BOTH_OPTION", "TRIM_END_OPTION);
 
-		chars=params.as_string(params.count()-1, 
-			"'chars' must be string").cstr();
+		if(params.count()>1) {
+			const String& schars=params.as_string(1, "'chars' must be string");
+			if(schars.length())
+				chars=schars.cstr();
+		}
 	}
 
 	r.write_assign_lang(src.trim(kind, chars));