From 67eddf78cf95d8a1f33cc63328459b805f30dab7 Mon Sep 17 00:00:00 2001
From: johnvg
Date: Fri, 3 Nov 2006 14:59:24 +0000
Subject: fix printing of _ label in .n directive for lazy record field
 selectors

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

(limited to 'backendC/CleanCompilerSources')

diff --git a/backendC/CleanCompilerSources/instructions.c b/backendC/CleanCompilerSources/instructions.c
index 00acba7..5987c76 100644
--- a/backendC/CleanCompilerSources/instructions.c
+++ b/backendC/CleanCompilerSources/instructions.c
@@ -2757,9 +2757,12 @@ void GenFieldNodeEntryDirective (int arity,Label label,Label label2,char *record
 		else
 			FPutS (empty_lab.lab_name, OutFile);
 		
-		if (label2){
+		if (label2!=NULL){
 			FPutC (' ', OutFile);
-			GenFieldLabel (label2,record_name);
+			if (label2==&empty_lab)
+				FPutS (empty_lab.lab_name, OutFile);				
+			else
+				GenFieldLabel (label2,record_name);
 		}
 	}
 }
-- 
cgit v1.2.3