--- parser3/src/classes/table.C	2020/11/10 22:42:25	1.350
+++ parser3/src/classes/table.C	2020/12/17 19:51:21	1.355
@@ -1,10 +1,18 @@
 /** @file
 	Parser: @b table parser class.
 
-	Copyright (c) 2001-2017 Art. Lebedev Studio (http://www.artlebedev.com)
+	Copyright (c) 2001-2020 Art. Lebedev Studio (http://www.artlebedev.com)
 	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
+#include "pa_config_includes.h"
+
+#if (!defined(NO_STRINGSTREAM) && !defined(FREEBSD4) && !defined(PA_DEBUG_DISABLE_GC))
+#include <sstream>
+#include "../lib/gc/include/gc_allocator.h"
+#define USE_STRINGSTREAM
+#endif
+
 #include "classes.h"
 #include "pa_vmethod_frame.h"
 
@@ -17,12 +25,7 @@
 #include "pa_vbool.h"
 #include "pa_array.h"
 
-#if (!defined(NO_STRINGSTREAM) && !defined(FREEBSD4) && !defined(PA_DEBUG_DISABLE_GC))
-#include <sstream>
-#define USE_STRINGSTREAM
-#endif
-
-volatile const char * IDENT_TABLE_C="$Id: table.C,v 1.350 2020/11/10 22:42:25 moko Exp $";
+volatile const char * IDENT_TABLE_C="$Id: table.C,v 1.355 2020/12/17 19:51:21 moko Exp $";
 
 // class
 
@@ -454,7 +457,6 @@ static void _load(Request& r, MethodPara
 }
 
 #ifdef USE_STRINGSTREAM
-#include "../lib/gc/include/gc_allocator.h"
 
 typedef std::basic_stringstream<char, std::char_traits<char>, gc_allocator<char> > pa_stringstream;
 typedef std::basic_string<char, std::char_traits<char>, gc_allocator<char> > pa_string;
@@ -1257,18 +1259,18 @@ static void join_nameless_row(Table& src
 	*dest+=src[src.current()];
 }
 static void _join(Request& r, MethodParams& params) {
-	Table& src=*params.as_table(0, "source");
-
-	Table::Action_options o=get_action_options(r, params, 1, src);
+	if(Table* src=params.as_table(0, "source")){
+		Table::Action_options o=get_action_options(r, params, 1, *src);
 
-	Table& dest=GET_SELF(r, VTable).table();
-	if(&src == &dest)
-		throw Exception(PARSER_RUNTIME, 0, "source and destination are same table");
-
-	if(dest.columns()) // dest is named
-		src.table_for_each(join_named_row, &dest, o);
-	else // dest is nameless
-		src.table_for_each(join_nameless_row, &dest, o);
+		Table& dest=GET_SELF(r, VTable).table();
+		if(src == &dest)
+			throw Exception(PARSER_RUNTIME, 0, "source and destination are same table");
+
+		if(dest.columns()) // dest is named
+			src->table_for_each(join_named_row, &dest, o);
+		else // dest is nameless
+			src->table_for_each(join_nameless_row, &dest, o);
+	}
 }
 
 #ifndef DOXYGEN