Fix crash in generating spell .sug file.

diff --git a/src/spell.c b/src/spell.c
index b4d6ca72de0d476dc6f949bd29368bb3cb97feea..6d4d47ea213b717fe80f0f7a8dda8aaf8bd82172 100644 (file)
--- a/src/spell.c
+++ b/src/spell.c
@@ -7557,7 +7557,8 @@ tree_add_word(spin, word, root, flags, region, affixID)
                np->wn_refs = node->wn_refs;
                node->wn_refs = 1;
            }
-           *prev = np;
+           if (prev != NULL)
+               *prev = np;
            np->wn_sibling = node;
            node = np;
        }