From c3d234a149dbbb74baec71586611c41aa6c97008 Mon Sep 17 00:00:00 2001
From: Juan Jose Garcia Ripoll <jjgarcia@users.sourceforge.net>
Date: Sat, 6 Nov 2010 15:01:25 +0100
Subject: [PATCH] Changed cmpwt.lsp to match the new ecl_def_ct* macros

---
 src/cmp/cmpwt.lsp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/cmp/cmpwt.lsp b/src/cmp/cmpwt.lsp
index c9bafc759..24eab26a2 100644
--- a/src/cmp/cmpwt.lsp
+++ b/src/cmp/cmpwt.lsp
@@ -237,7 +237,7 @@
     (static-constant-delegate name-imag (imagpart value) stream)
     (terpri stream)
     (format stream
-	    "ecl_def_ct_complex(~A,&~Adata,&~Adata,static,const);"
+	    "ecl_def_ct_complex(~A,&~A_data,&~A_data,static,const);"
 	    name name-real name-imag)))
 
 #+sse2