# HG changeset patch
# User Christian Brabandt <cb@256bit.org>
# Date 1464210007 -7200
# Node ID 1b41750311b644c28cbbd2345d42739ff59f5ef4
# Parent  abbd8af60897de68119201c7447559e8a6d3b591
commit https://github.com/vim/vim/commit/13ddc5c35921efa69e980284117b6db6465e019c
Author: Bram Moolenaar <Bram@vim.org>
Date:   Wed May 25 22:51:17 2016 +0200

    patch 7.4.1847
    Problem:    Getting an item from a NULL dict crashes.  Setting a register to a
                NULL list crashes. (Nikolai Pavlov, issue https://github.com/vim/vim/issues/768)  Comparing a NULL
                dict with a NULL dict fails.
    Solution:   Properly check for NULL.

diff --git a/src/eval.c b/src/eval.c
--- a/src/eval.c
+++ b/src/eval.c
@@ -6230,6 +6230,8 @@ dict_equal(
     dictitem_T	*item2;
     int		todo;
 
+    if (d1 == NULL && d2 == NULL)
+	return TRUE;
     if (d1 == NULL || d2 == NULL)
 	return FALSE;
     if (d1 == d2)
@@ -7763,6 +7765,8 @@ dict_find(dict_T *d, char_u *key, int le
     char_u	*tofree = NULL;
     hashitem_T	*hi;
 
+    if (d == NULL)
+	return NULL;
     if (len < 0)
 	akey = key;
     else if (len >= AKEYLEN)
@@ -18603,8 +18607,12 @@ f_setreg(typval_T *argvars, typval_T *re
 	char_u		buf[NUMBUFLEN];
 	char_u		**curval;
 	char_u		**curallocval;
-	int		len = argvars[1].vval.v_list->lv_len;
+	list_T		*ll = argvars[1].vval.v_list;
 	listitem_T	*li;
+	int		len;
+
+	/* If the list is NULL handle like an empty list. */
+	len = ll == NULL ? 0 : ll->lv_len;
 
 	/* First half: use for pointers to result lines; second half: use for
 	 * pointers to allocated copies. */
@@ -18615,7 +18623,7 @@ f_setreg(typval_T *argvars, typval_T *re
 	allocval = lstval + len + 2;
 	curallocval = allocval;
 
-	for (li = argvars[1].vval.v_list->lv_first; li != NULL;
+	for (li = ll == NULL ? NULL : ll->lv_first; li != NULL;
 							     li = li->li_next)
 	{
 	    strval = get_tv_string_buf_chk(&li->li_tv, buf);
diff --git a/src/testdir/test_expr.vim b/src/testdir/test_expr.vim
--- a/src/testdir/test_expr.vim
+++ b/src/testdir/test_expr.vim
@@ -90,3 +90,14 @@ func Test_loop_over_null_list()
     call assert_true(0, 'should not get here')
   endfor
 endfunc
+
+func Test_compare_null_dict()
+  call assert_fails('let x = test_null_dict()[10]')
+  call assert_equal({}, {})
+  call assert_equal(test_null_dict(), test_null_dict())
+  call assert_notequal({}, test_null_dict())
+endfunc
+
+func Test_set_reg_null_list()
+  call setreg('x', test_null_list())
+endfunc
diff --git a/src/version.c b/src/version.c
--- a/src/version.c
+++ b/src/version.c
@@ -754,6 +754,8 @@ static char *(features[]) =
 static int included_patches[] =
 {   /* Add new patch number below this line */
 /**/
+    1847,
+/**/
     1846,
 /**/
     1845,