From 67269c4140d148afb1d7de0d020bad116720ae6c Mon Sep 17 00:00:00 2001
From: Martin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Date: Sun, 5 Nov 2023 15:40:47 +0100
Subject: [PATCH] Clean up ZROTG

---
 interface/zrotg.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/interface/zrotg.c b/interface/zrotg.c
index d51cd2da69..5beda47967 100644
--- a/interface/zrotg.c
+++ b/interface/zrotg.c
@@ -30,8 +30,8 @@ void CNAME(void *VDA, void *VDB, FLOAT *C, void *VS) {
   FLOAT db_r = *(DB+0);
   FLOAT db_i = *(DB+1);
   //long double r;
-  FLOAT *r, *S1[2];
-  FLOAT *R=[2];
+  FLOAT S1[2];
+  FLOAT R=[2];
   long double d;
 
   FLOAT ada =  da_r * da_r + da_i * da_i;