--- parser3/src/classes/json.C	2017/02/07 22:00:28	1.52
+++ parser3/src/classes/json.C	2021/01/15 16:28:36	1.56
@@ -1,7 +1,7 @@
 /** @file
 	Parser: @b json parser class.
 
-	Copyright (c) 2000-2017 Art. Lebedev Studio (http://www.artlebedev.com)
+	Copyright (c) 2000-2020 Art. Lebedev Studio (http://www.artlebedev.com)
 */
 
 #include "classes.h"
@@ -18,7 +18,7 @@
 #include "pa_vxdoc.h"
 #endif
 
-volatile const char * IDENT_JSON_C="$Id: json.C,v 1.52 2017/02/07 22:00:28 moko Exp $";
+volatile const char * IDENT_JSON_C="$Id: json.C,v 1.56 2021/01/15 16:28:36 moko Exp $";
 
 // class
 
@@ -32,7 +32,7 @@ public:
 DECLARE_CLASS_VAR(json, new MJson);
 
 // methods
-struct Json {
+struct Json : public PA_Allocated {
 	Stack<VHash*> stack;
 	Stack<String*> key_stack;
 
@@ -366,7 +366,7 @@ const uint ANTI_ENDLESS_JSON_STRING_RECO
 char *get_indent(uint level){
 	static char* cache[ANTI_ENDLESS_JSON_STRING_RECOURSION]={};
 	if (!cache[level]){
-		char *result = 	static_cast<char*>(pa_gc_malloc_atomic(level+1));
+		char *result = static_cast<char*>(pa_malloc_atomic(level+1));
 		memset(result, '\t', level);
 		result[level]='\0';
 		return cache[level]=result;
@@ -374,6 +374,21 @@ char *get_indent(uint level){
 	return cache[level];
 }
 
+String *get_delim(uint level){
+	static String* cache[ANTI_ENDLESS_JSON_STRING_RECOURSION]={};
+
+	if (!cache[level]){
+		char *result = static_cast<char*>(pa_malloc_atomic(level+2+1+1));
+		result[0]=',';
+		result[1]='\n';
+		memset(result+2, '\t', level);
+		result[level+2]='"';
+		result[level+3]='\0';
+		return cache[level] = new String(result, String::L_AS_IS);
+	}
+	return cache[level];
+}
+
 class Json_string_recoursion {
 	Json_options& foptions;
 public:
@@ -406,7 +421,7 @@ const String* Json_options::hash_json_st
 				result << *delim;
 			} else {
 				result << indent << "\"";
-				delim = new String(",\n", String::L_AS_IS); *delim << indent << "\"";
+				delim = get_delim(json_string_recoursion);
 			}
 			result << String(i.key(), String::L_JSON) << "\":" << value_json_string(i.key(), *i.value(), *this);
 		}