From d17dcddb7fbe2414155351c74fb647cc0de9c1f9 Mon Sep 17 00:00:00 2001
From: johnvg
Date: Tue, 22 Dec 2009 14:12:14 +0000
Subject: prevent crash if def_node==NULL (lhs strictness annotation)

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1757 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 backendC/CleanCompilerSources/codegen3.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'backendC')

diff --git a/backendC/CleanCompilerSources/codegen3.c b/backendC/CleanCompilerSources/codegen3.c
index 28b783e..1569b0b 100644
--- a/backendC/CleanCompilerSources/codegen3.c
+++ b/backendC/CleanCompilerSources/codegen3.c
@@ -2765,8 +2765,8 @@ struct saved_node_id_ref_counts* save_rhs_node_id_ref_counts
 			
 			new_snir_p->snir_next=snir_p;
 			snir_p=new_snir_p;
-			
-			if (node_def_p->def_node->node_kind==TupleSelectorsNode){
+
+			if (node_def_p->def_node!=NULL && node_def_p->def_node->node_kind==TupleSelectorsNode){
 				ArgP arg_p;
 				
 				for_l (arg_p,node_def_p->def_node->node_arguments,arg_next)
-- 
cgit v1.2.3