From 305f698b9a31e625e091bb7f330c0201df39ee76 Mon Sep 17 00:00:00 2001
From: Wang Renxin <hellotony521@qq.com>
Date: Wed, 10 May 2017 21:04:34 +0800
Subject: [PATCH] *fixed a crash bug when there's no receiver of a returned
 string value.

---
 HISTORY         | 1 +
 core/my_basic.c | 4 +++-
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/HISTORY b/HISTORY
index 21e88c2..8ce865b 100755
--- a/HISTORY
+++ b/HISTORY
@@ -1,5 +1,6 @@
 May. 10 2017
 Added an mb_make_usertype_bytes macro
+Fixed a crash bug when there's no receiver of a returned string value, thanks to Beyond07 for pointing it out
 
 May. 8 2017
 Added fork functions
diff --git a/core/my_basic.c b/core/my_basic.c
index 9da67e6..92608d4 100755
--- a/core/my_basic.c
+++ b/core/my_basic.c
@@ -9946,7 +9946,7 @@ static void _mark_edge_destroy_string(mb_interpreter_t* s, char* ch) {
 static void _destroy_lazy_objects(mb_interpreter_t* s) {
 	mb_assert(s);
 
-	_ls_foreach(s->lazy_destroy_objects, _destroy_object);
+	_LS_FOREACH(s->lazy_destroy_objects, _destroy_object, _try_clear_intermediate_value, s);
 	_ls_clear(s->lazy_destroy_objects);
 }
 
@@ -11883,6 +11883,8 @@ int mb_pop_value(struct mb_interpreter_t* s, void** l, mb_value_t* val) {
 	}
 #endif /* MB_ENABLE_USERTYPE_REF */
 	ast = (_ls_node_t*)*l;
+	if(!ast)
+		goto _exit;
 #ifdef _MULTILINE_STATEMENT
 	if(_multiline_statement(s)) {
 		_object_t* obj = 0;